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

indentation of inserted comment.

2 files changed, 16 insertions, 12 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 763ffd0dd0f..02b380e1bb2 100644
--- 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 bb2f67422e3..9fa817bd102 100644
--- 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))