[elpa] externals/engrave-faces 32fb760ca8 2/6: Don't record height/strike-through of default face

[ELPA Syncer]

branch: externals/engrave-faces
commit 32fb760ca86c8aa1152fef019f8bfc2903f7a66e
Author: TEC <tec@tecosaur.com>
Commit: TEC <tec@tecosaur.com>

    Don't record height/strike-through of default face
---
 engrave-faces.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/engrave-faces.el b/engrave-faces.el
index fef009e033..7b723650e4 100644
--- a/engrave-faces.el
+++ b/engrave-faces.el
@@ -370,7 +370,8 @@ Unconditionally returns nil when FACES is default."
                      (let ((attr-val (when (facep (car face-style))
                                        (face-attribute (car face-style) attr 
nil t))))
                        (when (or (engrave-faces--check-nondefault attr 
attr-val)
-                                 (eq (car face-style) 'default))
+                                 (and (eq (car face-style) 'default)
+                                      (not (memq attr '(:height 
:strike-through)))))
                          (list attr attr-val))))
                    engrave-faces-attributes-of-interest))))
    engrave-faces-preset-styles))