[Emacs-diffs] master 270ca8c: Fix internal-lisp-face-attributes to match face.

[Jimmy Aguilar Mena]

branch: master
commit 270ca8c2735cfc7935b9e4d0b770a55138493ef3
Author: Jimmy Aguilar Mena <address@hidden>
Commit: Jimmy Aguilar Mena <address@hidden>

    Fix internal-lisp-face-attributes to match face.
    
    * lisp/face-remap.el (internal-lisp-face-attributes): Updated the
    vector members to match the real member names. (Bug#37806) (Bug#37824)
---
 lisp/face-remap.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/lisp/face-remap.el b/lisp/face-remap.el
index 5cdecb9..f2ff2ec 100644
--- a/lisp/face-remap.el
+++ b/lisp/face-remap.el
@@ -64,12 +64,14 @@
 ;; Names of face attributes corresponding to lisp face-vector positions.
 ;; This variable should probably be defined in C code where the actual
 ;; definitions are available.
+;; :vector must be always at the end as a guard
 ;;
 (defvar internal-lisp-face-attributes
   [nil
-   :family :foundry :swidth :height :weight :slant :underline :inverse
-   :foreground :background :stipple :overline :strike :box
-   :font :inherit :fontset :vector])
+   :family :foundry :width :height :weight :slant :underline
+   :inverse-video
+   :foreground :background :stipple :overline :strike-through :box
+   :font :inherit :fontset :distant-foreground :extend :vector])
 
 (defun face-attrs-more-relative-p (attrs1 attrs2)
   "Return true if ATTRS1 contains a greater number of relative