diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2008-06-10 21:24:18 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2008-06-10 21:24:18 +0000 |
| commit | e34b0c60d5f5ec92dc53319230d77c953ac66282 (patch) | |
| tree | c394ccd168a1ead3852c83b9cb4ebb8e7a03ccf6 | |
| parent | f473ed6f6f1e471e6fd235543091dd135b8da5bd (diff) | |
| download | emacs-e34b0c60d5f5ec92dc53319230d77c953ac66282.tar.gz | |
(menu-bar-options-save): Minor tweak to last change.
| -rw-r--r-- | lisp/menu-bar.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index cab0fc32e95..710022b9191 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -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)))) |