diff options
| author | Miles Bader | 2005-09-06 07:30:14 +0000 |
|---|---|---|
| committer | Miles Bader | 2005-09-06 07:30:14 +0000 |
| commit | 389cb481135145b80a679beec8cdc8fed75682c5 (patch) | |
| tree | 4eb407ade59e532003d7ee70082d57f0114c6df6 /lisp | |
| parent | 621806aab200b6d9bc592471b55e8664aa3646f3 (diff) | |
| parent | 2a6bc1f7cae62b2ddfdf574ba4686fdecb92bfc7 (diff) | |
| download | emacs-389cb481135145b80a679beec8cdc8fed75682c5.tar.gz emacs-389cb481135145b80a679beec8cdc8fed75682c5.zip | |
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-80
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 531)
- Update from CVS
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/custom.el | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c515f9accc7..a0256150af9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,9 @@ | |||
| 1 | 2005-09-05 Chong Yidong <cyd@stupidchicken.com> | 1 | 2005-09-05 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 2 | ||
| 3 | * custom.el (custom-push-theme): Fix last change. | ||
| 4 | |||
| 5 | 2005-09-05 Chong Yidong <cyd@stupidchicken.com> | ||
| 6 | |||
| 3 | * cus-theme.el (custom-theme-write-faces): Save the current face | 7 | * cus-theme.el (custom-theme-write-faces): Save the current face |
| 4 | spec, not the defface spec. | 8 | spec, not the defface spec. |
| 5 | 9 | ||
diff --git a/lisp/custom.el b/lisp/custom.el index 2b714a7b458..d634160e534 100644 --- a/lisp/custom.el +++ b/lisp/custom.el | |||
| @@ -649,7 +649,8 @@ See `custom-known-themes' for a list of known themes." | |||
| 649 | (progn | 649 | (progn |
| 650 | (setcar (cdr setting) mode) | 650 | (setcar (cdr setting) mode) |
| 651 | (setcar (cddr setting) value)) | 651 | (setcar (cddr setting) value)) |
| 652 | (if (null old) | 652 | (if (and (null old) |
| 653 | (boundp symbol)) | ||
| 653 | (setq old | 654 | (setq old |
| 654 | (list | 655 | (list |
| 655 | (list 'standard 'set | 656 | (list 'standard 'set |