[Emacs-diffs] /srv/bzr/emacs/trunk r101053: * lisp/cus-edit.el (custom-save-variables, custom-save-faces): Fix up

[Stefan Monnier]

------------------------------------------------------------
revno: 101053
author: Antoine Levitt <address@hidden>
committer: Stefan Monnier <address@hidden>
branch nick: trunk
timestamp: Thu 2010-08-12 10:55:20 +0200
message:
  * lisp/cus-edit.el (custom-save-variables, custom-save-faces): Fix up
  indentation of inserted comment.
modified:
  lisp/ChangeLog
  lisp/cus-edit.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-08-11 18:28:10 +0000
+++ b/lisp/ChangeLog    2010-08-12 08:55:20 +0000
@@ -1,3 +1,8 @@
+2010-08-12  Antoine Levitt  <address@hidden>  (tiny change)
+
+       * cus-edit.el (custom-save-variables, custom-save-faces): Fix up
+       indentation of inserted comment.
+
 2010-08-11  Jan Djärv  <address@hidden>
 
        * 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  <address@hidden>
 

=== modified file 'lisp/cus-edit.el'
--- a/lisp/cus-edit.el  2010-04-20 18:52:07 +0000
+++ b/lisp/cus-edit.el  2010-08-12 08:55:20 +0000
@@ -4404,10 +4404,10 @@
       (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 @@
       (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))