zenburn-el
zenburn-el copied to clipboard
error "Invalid face" custom-face-tag
Here's what I get from `M-x color-theme-select' after enabling zenburn:
Debugger entered--Lisp error: (error "Invalid face" custom-face-tag)
internal-get-lisp-face-attribute(custom-face-tag :family #<frame Minibuf-1 - 4 0x1007e1160>)
face-attribute(custom-face-tag :family #<frame Minibuf-1 - 4 0x1007e1160>)
custom-face-attributes-get(custom-face-tag #<frame Minibuf-1 - 4 0x1007e1160>)
(if (atom face) (custom-face-attributes-get face frame) (if (and ... ...) (custom-face-attributes-get ... frame) (custom-face-attributes-get ... frame)))
color-theme-face-attr-construct(custom-face-tag #<frame Minibuf-1 - 4 0x1007e1160>)
(color-theme-spec-resolve-inheritance (color-theme-face-attr-construct face (selected-frame)))
(let ((more-atts ...) att val) (while more-atts (setq att ... val ... more-atts ...) (cond ... ...)))
(progn (setq atts (delq ... ...)) (let (... att val) (while more-atts ... ...)))
(if face (progn (setq atts ...) (let ... ...)))
(when face (setq atts (delq ... ...)) (let (... att val) (while more-atts ... ...)))
(let ((face ...)) (when face (setq atts ...) (let ... ...)) atts)
color-theme-spec-resolve-inheritance((:inherit))
(color-theme-spec-maybe-invert (color-theme-spec-resolve-inheritance (color-theme-face-attr-construct face ...)))
(color-theme-spec-canonical-font (color-theme-spec-maybe-invert (color-theme-spec-resolve-inheritance ...)))
(let ((atts ...)) (if atts ( ...) (
...)))
color-theme-spec(custom-face-tag-face)
mapcar(color-theme-spec (default Buffer-menu-buffer-face apt-utils-broken apt-utils-broken-face apt-utils-description apt-utils-description-face apt-utils-field-contents apt-utils-field-contents-face apt-utils-field-keyword apt-utils-field-keyword-face apt-utils-normal-package apt-utils-normal-package-face apt-utils-summary apt-utils-summary-face apt-utils-version apt-utils-version-face apt-utils-virtual-package apt-utils-virtual-package-face bold bold-italic bongo-unfilled-seek-bar border breakpoint-disabled-bitmap breakpoint-disabled-bitmap-face breakpoint-enabled-bitmap breakpoint-enabled-bitmap-face buffer-menu-buffer button calendar-today calendar-today-face change-log-date change-log-date-face circe-highlight-nick-face circe-my-message-face circe-originator-face circe-prompt-face circe-server-face comint-highlight-input comint-highlight-prompt compilation-info compilation-info-face compilation-mouseover compilation-warning compilation-warning-face completions-annotations completions-common-part completions-first-difference cscope-file-face cscope-function-face cscope-line-face ...))
(let ((faces ...)) (mapcar (quote color-theme-spec) faces))
color-theme-get-face-definitions()
(cons (color-theme-get-vars) (color-theme-get-face-definitions))
(cons (color-theme-get-params) (cons (color-theme-get-vars) (color-theme-get-face-definitions)))
(cons (quote color-theme-snapshot) (cons (color-theme-get-params) (cons ... ...)))
(backquote-list* (quote color-theme-snapshot) (color-theme-get-params) (color-theme-get-vars) (color-theme-get-face-definitions))
(list (quote quote) (backquote-list* (quote color-theme-snapshot) (color-theme-get-params) (color-theme-get-vars) (color-theme-get-face-definitions)))
(list (quote color-theme-install) (list (quote quote) (backquote-list* ... ... ... ...)))
(list (quote lambda) nil "The color theme in use when the selection buffer was created.\n[color-theme-select] creates the color theme selection buffer. At the\nsame time, this snapshot is created as a very simple undo mechanism.\nThe snapshot is created via color-theme-snapshot'." (quote (interactive)) (list (quote color-theme-install) (list ... ...))) (\
(lambda nil "The color theme in use when the selection buffer was created.\n[color-theme-select] creates the color theme selection buffer. At the\nsame time, this snapshot is created as a very simple undo mechanism.\nThe snapshot is created via color-theme-snapshot'." (interactive) (color-theme-install ...))) (eval (\
(lambda nil "The color theme in use when the selection buffer was created.\n[color-theme-select] creates the color theme selection buffer. At the\nsame time, this snapshot is created as a very simple undo mechanism.\nThe snapshot is created via `color-theme-snapshot'." ... ...)))
color-theme-make-snapshot()
(fset (quote color-theme-snapshot) (color-theme-make-snapshot))
(progn (fset (quote color-theme-snapshot) (color-theme-make-snapshot)) (setq color-themes (delq ... color-themes) color-themes (delq ... color-themes) color-themes (append ... color-themes)))
(if (or (not ...) (not ...)) (progn (fset ... ...) (setq color-themes ... color-themes ... color-themes ...)))
(when (or (not ...) (not ...)) (fset (quote color-theme-snapshot) (color-theme-make-snapshot)) (setq color-themes (delq ... color-themes) color-themes (delq ... color-themes) color-themes (append ... color-themes)))
color-theme-select(nil)
call-interactively(color-theme-select t nil)
execute-extended-command(nil)
call-interactively(execute-extended-command nil nil)
I found the same issue with org faces. I think the face alias clauses need something; this seems to get me over the hump but who knows what's needed that I already pulled in "by accident" due to other initialization:
(require 'cus-edit) ;; for custom-face-tag-face et. al
(require 'org-faces) ;; for org faces in alias clause