# HG changeset patch # User Juanma Barranquero # Date 1121062177 0 # Node ID 90c5009c1621ad1792d4668d02ee9d9910630d11 # Parent aab16328f79e45bbff928e4c6363b969a47a679c (custom-enable-theme): Don't add theme to `custom-enabled-themes' with `push' because there is no setf-method for `delq'. diff -r aab16328f79e -r 90c5009c1621 lisp/custom.el --- 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)))