[elpa] externals/spacious-padding 21e785b044 1/4: Allow specifying 0 padding for mode-line, header-line, etc.

[ELPA Syncer]

branch: externals/spacious-padding
commit 21e785b044b17f4015a8d51d1eb0ce2aa1a0450a
Author: Ruby Iris Juric <ruby@srxl.me>
Commit: Ruby Iris Juric <ruby@srxl.me>

    Allow specifying 0 padding for mode-line, header-line, etc.
---
 spacious-padding.el | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/spacious-padding.el b/spacious-padding.el
index 41df203c92..c6514a9bd3 100644
--- a/spacious-padding.el
+++ b/spacious-padding.el
@@ -241,15 +241,18 @@ overline."
     (let* ((original-bg (face-background face nil fallback))
            (subtle-bg (face-background 'default))
            (subtlep (and subtle-key spacious-padding-subtle-mode-line))
-           (bg (if subtlep subtle-bg original-bg)))
+           (bg (if subtlep subtle-bg original-bg))
+           (face-width (spacious-padding--get-face-width face)))
       `(,@(when subtlep
             (list
              :background bg
              :overline (spacious-padding--get-face-overline-color face 
fallback subtle-key)))
-        :box
-        ( :line-width ,(spacious-padding--get-face-width face)
-          :color ,bg
-          :style nil)))))
+        ,@(unless (eq face-width 0)
+            (list
+             :box
+             `( :line-width ,face-width
+                :color ,bg
+                :style nil)))))))
 
 (defun spacious-padding-set-window-divider (face color)
   "Set window divider FACE to COLOR its width is greater than 1."