Mercurial > hg > xemacs-beta

changeset 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 e4225b6d9389
children 279739019e5c
files lisp/ChangeLog lisp/custom.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Apr 04 10:48:58 2008 -0700
+++ b/lisp/ChangeLog	Fri Apr 04 10:50:19 2008 -0700
@@ -1,3 +1,8 @@
+2008-03-19  Stephen J. Turnbull  <stephen@xemacs.org>
+
+	* custom.el (custom-theme-reset-internal): Fix call to get (symbol
+	and property were reversed).
+
 2008-03-12  Mike Sperber  <mike@xemacs.org>
 
 	* window-xemacs.el (restore-saved-window): Restore window
--- 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))