changeset 42488:cbf9d3debb0a

(facemenu-active-faces): Use face-attributes-as-vector, not face-attributes-vector.
author Richard M. Stallman <rms@gnu.org>
date Wed, 02 Jan 2002 22:56:04 +0000
parents 88fb2c8602aa
children f9c5738cf0d1
files lisp/facemenu.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/facemenu.el	Wed Jan 02 21:55:01 2002 +0000
+++ b/lisp/facemenu.el	Wed Jan 02 22:56:04 2002 +0000
@@ -611,7 +611,7 @@
 use the selected frame.  If t, then the global, non-frame faces are used."
   (let* ((mask-atts (copy-sequence
 		     (if (consp (car face-list))
-			 (face-attribute-vector (car face-list))
+			 (face-attributes-as-vector (car face-list))
 		       (or (internal-lisp-face-p (car face-list) frame)
 			   (check-face (car face-list))))))
 	 (active-list (list (car face-list)))
@@ -620,7 +620,7 @@
     (while face-list
       (if (let ((face-atts
 		 (if (consp (car face-list))
-		     (face-attribute-vector (car face-list))
+		     (face-attributes-as-vector (car face-list))
 		   (or (internal-lisp-face-p (car face-list) frame)
 		       (check-face (car face-list)))))
 		(i mask-len)