diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2005-09-05 19:50:02 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2005-09-05 19:50:02 +0000 |
| commit | 79a0aa117492468055f2b07f40e24355689b3030 (patch) | |
| tree | 5a8213a51aa934fce8063374057ef452dc0f6ed1 /lisp/cus-theme.el | |
| parent | c9ac21eb0d8fa6ad3153e74fce8b6ed5dc7588db (diff) | |
| download | emacs-79a0aa117492468055f2b07f40e24355689b3030.tar.gz | |
Custom Theme bugfixes.
Diffstat (limited to 'lisp/cus-theme.el')
| -rw-r--r-- | lisp/cus-theme.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/cus-theme.el b/lisp/cus-theme.el index 95a0a4b2896..43cf96e34fa 100644 --- a/lisp/cus-theme.el +++ b/lisp/cus-theme.el @@ -168,8 +168,9 @@ It includes all faces in list FACES." (princ " '(") (prin1 symbol) (princ " ") - (prin1 (or (get symbol 'customized-face) - (get symbol 'face-defface-spec))) + (prin1 (list (append '(t) + (custom-face-attributes-get + 'font-lock-comment-face nil)))) (princ ")"))) faces) (if (bolp) |