Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

error "Invalid face" custom-face-tag #12

Open
dabrahams opened this issue Sep 28, 2011 · 1 comment
Open

error "Invalid face" custom-face-tag #12

dabrahams opened this issue Sep 28, 2011 · 1 comment

Comments

@dabrahams
Copy link
Contributor

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)

@dabrahams
Copy link
Contributor Author

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

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

1 participant