Mercurial > emacs
changeset 95797:49171eb71c47
(menu-bar-options-save): Minor tweak to last change.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Tue, 10 Jun 2008 21:24:18 +0000 |
| parents | 6e0425f2bc3d |
| children | 813561cb0d2c |
| files | lisp/menu-bar.el |
| diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/menu-bar.el Tue Jun 10 20:57:13 2008 +0000 +++ b/lisp/menu-bar.el Tue Jun 10 21:24:18 2008 +0000 @@ -676,8 +676,10 @@ (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))))