diff options
| author | Chong Yidong | 2006-09-29 18:31:33 +0000 |
|---|---|---|
| committer | Chong Yidong | 2006-09-29 18:31:33 +0000 |
| commit | 31b7fa51d6eef97c8fc4e30684f6e5a0aa8c65cd (patch) | |
| tree | bb0b65c82509c8049a5576900b00bd886b7e7983 | |
| parent | 13f131df0288db62374f6420bdd0ff5034e19f91 (diff) | |
| download | emacs-31b7fa51d6eef97c8fc4e30684f6e5a0aa8c65cd.tar.gz emacs-31b7fa51d6eef97c8fc4e30684f6e5a0aa8c65cd.zip | |
* cus-edit.el (custom-save-all): Switch to emacs-lisp mode before
saving anything to be sure that `forward-sexp' behaves correctly.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/cus-edit.el | 2 |
2 files changed, 7 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d1db638e588..5b9783f6514 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2006-09-26 Micha,Ak(Bl Cadilhac <michael.cadilhac@lrde.org> | ||
| 2 | |||
| 3 | * cus-edit.el (custom-save-all): Switch to emacs-lisp mode before | ||
| 4 | saving anything to be sure that `forward-sexp' behaves correctly. | ||
| 5 | |||
| 1 | 2006-09-29 Chong Yidong <cyd@stupidchicken.com> | 6 | 2006-09-29 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 7 | ||
| 3 | * simple.el (line-move-finish): Ignore field boundaries if the | 8 | * simple.el (line-move-finish): Ignore field boundaries if the |
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 82d2f147874..2f752c5fb66 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el | |||
| @@ -4157,6 +4157,8 @@ if only the first line of the docstring is shown.")) | |||
| 4157 | recentf-exclude))) | 4157 | recentf-exclude))) |
| 4158 | (old-buffer (find-buffer-visiting filename))) | 4158 | (old-buffer (find-buffer-visiting filename))) |
| 4159 | (with-current-buffer (or old-buffer (find-file-noselect filename)) | 4159 | (with-current-buffer (or old-buffer (find-file-noselect filename)) |
| 4160 | (unless (eq major-mode 'emacs-lisp-mode) | ||
| 4161 | (emacs-lisp-mode)) | ||
| 4160 | (let ((inhibit-read-only t)) | 4162 | (let ((inhibit-read-only t)) |
| 4161 | (custom-save-variables) | 4163 | (custom-save-variables) |
| 4162 | (custom-save-faces)) | 4164 | (custom-save-faces)) |