You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
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
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 viacolor-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)
The text was updated successfully, but these errors were encountered: