diff options
| -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)) |