diff options
Diffstat (limited to 'lisp/custom.el')
| -rw-r--r-- | lisp/custom.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/custom.el b/lisp/custom.el index cf06fe27f4d..4f7826093e8 100644 --- a/lisp/custom.el +++ b/lisp/custom.el @@ -849,10 +849,10 @@ See `custom-known-themes' for a list of known themes." ;; theme is later disabled. (cond ((and (eq prop 'theme-value) (boundp symbol)) - (let ((sv (get symbol 'standard-value))) - (unless (and sv - (equal (eval (car sv)) (symbol-value symbol))) - (setq old (list (list 'changed (symbol-value symbol))))))) + (let ((sv (get symbol 'standard-value)) + (val (symbol-value symbol))) + (unless (and sv (equal (eval (car sv)) val)) + (setq old `((changed ,(custom-quote val))))))) ((and (facep symbol) (not (face-attr-match-p symbol |