# HG changeset patch # User Chong Yidong # Date 1125976486 0 # Node ID d82393ad9b2dbada31a7b4e86423f403494368c2 # Parent c71b1b2d2d04c66522df10d24d657ae60accd6c8 Fix last change to custom-push-theme. diff -r c71b1b2d2d04 -r d82393ad9b2d lisp/ChangeLog --- a/lisp/ChangeLog Mon Sep 05 23:58:09 2005 +0000 +++ b/lisp/ChangeLog Tue Sep 06 03:14:46 2005 +0000 @@ -1,3 +1,7 @@ +2005-09-05 Chong Yidong + + * custom.el (custom-push-theme): Fix last change. + 2005-09-05 Chong Yidong * cus-theme.el (custom-theme-write-faces): Save the current face diff -r c71b1b2d2d04 -r d82393ad9b2d lisp/custom.el --- a/lisp/custom.el Mon Sep 05 23:58:09 2005 +0000 +++ b/lisp/custom.el Tue Sep 06 03:14:46 2005 +0000 @@ -649,7 +649,8 @@ (progn (setcar (cdr setting) mode) (setcar (cddr setting) value)) - (if (null old) + (if (and (null old) + (boundp symbol)) (setq old (list (list 'standard 'set