(menu-bar-options-save): Minor tweak to last change.
authorChong Yidong <cyd@stupidchicken.com>
Tue, 10 Jun 2008 21:24:18 +0000 (21:24 +0000)
committerChong Yidong <cyd@stupidchicken.com>
Tue, 10 Jun 2008 21:24:18 +0000 (21:24 +0000)
lisp/menu-bar.el

index cab0fc3..710022b 100644 (file)
@@ -676,8 +676,10 @@ by \"Save Options\" in Custom buffers.")
       (and (get elt 'customized-value)
           (customize-mark-to-save elt)
           (setq need-save t)))
-    (and (get 'default 'customized-face)
-        (put 'default 'saved-face (get 'default 'customized-face)))
+    (when (get 'default 'customized-face)
+      (put 'default 'saved-face (get 'default 'customized-face))
+      (put 'default 'customized-face nil)
+      (setq need-save t))
     ;; Save if we changed anything.
     (when need-save
       (custom-save-all))))