Mercurial > hg > xemacs-beta

diff lisp/custom.el @ 4441:1d7faae1080c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix call to get in custom-theme-reset-internal.
author Stephen J. Turnbull <stephen@xemacs.org>
date Fri, 04 Apr 2008 10:50:19 -0700
parents 20accccbebd6
children 8748a3f7ceb4
line wrap: on
line diff
--- a/lisp/custom.el	Fri Apr 04 10:48:58 2008 -0700
+++ b/lisp/custom.el	Fri Apr 04 10:50:19 2008 -0700
@@ -1039,7 +1039,7 @@
     (setq value (or value (get symbol 'standard-value)))
     (when value
       (put symbol 'saved-value was-in-theme)
-      (if (or (get 'force-value symbol) (default-boundp symbol))
+      (if (or (get symbol 'force-value) (default-boundp symbol))
           (funcall (or (get symbol 'custom-set) 'set-default) symbol
                    (eval (car value)))))
     value))