[elpa] externals/spacious-padding ea2175b36a 2/4: Merge pull request #7 from Sorixelle/allow-zero-padding

[ELPA Syncer]

branch: externals/spacious-padding
commit ea2175b36a2d7fe0633cb3f8cf6dc6d71f5914ae
Merge: 227e6144cd 21e785b044
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: GitHub <nore...@github.com>

    Merge pull request #7 from Sorixelle/allow-zero-padding
    
    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."