* cus-edit.el (custom-save-all): Switch to emacs-lisp mode before

	saving anything to be sure that `forward-sexp' behaves correctly.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d1db638e588607231ace75cb75005a115504f5e9..5b9783f65148bedfca94e520835c5fc4f51e254f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-09-26  Micha\e,Ak\e(Bl Cadilhac  <michael.cadilhac@lrde.org>
+
+       * cus-edit.el (custom-save-all): Switch to emacs-lisp mode before
+       saving anything to be sure that `forward-sexp' behaves correctly.
+
 2006-09-29  Chong Yidong  <cyd@stupidchicken.com>
 
        * simple.el (line-move-finish): Ignore field boundaries if the

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 82d2f147874da0fe8dc8097540a4e067cb4e19cf..2f752c5fb66747b5923627f0e8d5252286646a58 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4157,6 +4157,8 @@ if only the first line of the docstring is shown."))
                                    recentf-exclude)))
         (old-buffer (find-buffer-visiting filename)))
     (with-current-buffer (or old-buffer (find-file-noselect filename))
+      (unless (eq major-mode 'emacs-lisp-mode)
+       (emacs-lisp-mode))
       (let ((inhibit-read-only t))
        (custom-save-variables)
        (custom-save-faces))