* lisp/cus-edit.el (custom-save-variables, custom-save-faces): Fix up

indentation of inserted comment.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 763ffd0dd0fcb8dc78c22780803ec45a469534f8..02b380e1bb29ab4567e8e44fbd4f35555ec611ae 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-08-12  Antoine Levitt  <antoine.levitt@gmail.com>  (tiny change)
+
+       * cus-edit.el (custom-save-variables, custom-save-faces): Fix up
+       indentation of inserted comment.
+
 2010-08-11  Jan Djärv  <jan.h.d@swipnet.se>
 
        * faces.el (region): Add type gtk that uses gtk colors.
@@ -11,8 +16,8 @@
        (sql-product-alist): Add :prompt-cont-regexp property for several
        database products.
        (sql-prompt-cont-regexp): New variable.
-       (sql-output-newline-count, sql-output-by-send): New
-       variables. Record number of newlines in input text.
+       (sql-output-newline-count, sql-output-by-send):
+       New variables.  Record number of newlines in input text.
        (sql-send-string): Handle multiple filters and count newlines.
        (sql-send-magic-terminator): Count terminator newline.
        (sql-interactive-remove-continuation-prompt): Filters output to
@@ -20,8 +25,7 @@
        (sql-interactive-mode): Set up new variables, prompt regexp and
        output filter.
        (sql-mode-sqlite-font-lock-keywords): Correct some keywords.
-       (sql-make-alternate-buffer-name): Correct buffer name in edge
-       cases.
+       (sql-make-alternate-buffer-name): Correct buffer name in edge cases.
 
 2010-08-10  Stefan Monnier  <monnier@iro.umontreal.ca>
 

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index bb2f67422e32d10e9ddfa9511e6067ec1e3dd5e4..9fa817bd10247247ac4fceebf3ce0adddb7aadad 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4404,10 +4404,10 @@ This function does not save the buffer."
       (unless (bolp)
        (princ "\n"))
       (princ "(custom-set-variables
-  ;; custom-set-variables was added by Custom.
-  ;; If you edit it by hand, you could mess it up, so be careful.
-  ;; Your init file should contain only one such instance.
-  ;; If there is more than one, they won't work right.\n")
+ ;; custom-set-variables was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.\n")
       (dolist (symbol saved-list)
        (let ((spec (car-safe (get symbol 'theme-value)))
              (value (get symbol 'saved-value))
@@ -4480,10 +4480,10 @@ This function does not save the buffer."
       (unless (bolp)
        (princ "\n"))
       (princ "(custom-set-faces
-  ;; custom-set-faces was added by Custom.
-  ;; If you edit it by hand, you could mess it up, so be careful.
-  ;; Your init file should contain only one such instance.
-  ;; If there is more than one, they won't work right.\n")
+ ;; custom-set-faces was added by Custom.
+ ;; If you edit it by hand, you could mess it up, so be careful.
+ ;; Your init file should contain only one such instance.
+ ;; If there is more than one, they won't work right.\n")
       (dolist (symbol saved-list)
        (let ((spec (car-safe (get symbol 'theme-face)))
              (value (get symbol 'saved-face))