Mercurial > emacs
changeset 64228:90c5009c1621
(custom-enable-theme): Don't add theme to `custom-enabled-themes' with `push'
because there is no setf-method for `delq'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Mon, 11 Jul 2005 06:09:37 +0000 |
| parents | aab16328f79e |
| children | e34914bd46cc |
| files | lisp/custom.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/custom.el Mon Jul 11 05:41:57 2005 +0000 +++ b/lisp/custom.el Mon Jul 11 06:09:37 2005 +0000 @@ -1102,7 +1102,8 @@ (if (eq prop 'theme-value) (custom-theme-recalc-variable symbol) (custom-theme-recalc-face symbol))))) - (push theme (delq theme custom-enabled-themes)) + (setq custom-enabled-themes + (cons theme (delq theme custom-enabled-themes))) ;; `user' must always be the highest-precedence enabled theme. (unless (eq theme 'user) (custom-enable-theme 'user)))