Fix last change to custom-push-theme.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6ad9d6e4d9b9b3f190d37afaa6b3c7453ea35a12..d1e102b52dafe565d567a92f91004fea0c8e5ee4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-09-05  Chong Yidong  <cyd@stupidchicken.com>
+
+       * custom.el (custom-push-theme): Fix last change.
+
 2005-09-05  Chong Yidong  <cyd@stupidchicken.com>
 
        * cus-theme.el (custom-theme-write-faces): Save the current face

diff --git a/lisp/custom.el b/lisp/custom.el
index 2b714a7b458adbcc5fa0c28f57fd80425a3599bd..d634160e534fbfcf151d894e2d42bd154a11f6d9 100644 (file)
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -649,7 +649,8 @@ See `custom-known-themes' for a list of known themes."
        (progn
          (setcar (cdr setting) mode)
          (setcar (cddr setting) value))
-      (if (null old)
+      (if (and (null old)
+              (boundp symbol))
          (setq old
                (list
                 (list 'standard 'set