changeset 59369:7c06e308c354

(custom-declare-face): Record defface in current-load-list.
author Richard M. Stallman <rms@gnu.org>
date Wed, 05 Jan 2005 01:10:01 +0000
parents 658501d06a20
children 32c6082ebc9f
files lisp/cus-face.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-face.el	Wed Jan 05 01:09:23 2005 +0000
+++ b/lisp/cus-face.el	Wed Jan 05 01:10:01 2005 +0000
@@ -50,6 +50,7 @@
 	    (make-face-x-resource-internal face))))
     ;; Don't record SPEC until we see it causes no errors.
     (put face 'face-defface-spec spec)
+    (push (cons 'defface face) current-load-list)
     (when (and doc (null (face-documentation face)))
       (set-face-documentation face (purecopy doc)))
     (custom-handle-all-keywords face args 'custom-face)