From 61b6abbdb48cf42646f8ea7894511e40ae1cab74 Mon Sep 17 00:00:00 2001 From: Antoine Levitt Date: Thu, 12 Aug 2010 10:55:20 +0200 Subject: [PATCH] * lisp/cus-edit.el (custom-save-variables, custom-save-faces): Fix up indentation of inserted comment. --- lisp/ChangeLog | 12 ++++++++---- lisp/cus-edit.el | 16 ++++++++-------- 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 (tiny change) + + * cus-edit.el (custom-save-variables, custom-save-faces): Fix up + indentation of inserted comment. + 2010-08-11 Jan Djärv * 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 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)) -- 2.39.2