# HG changeset patch # User Stefan Monnier # Date 1281603320 -7200 # Node ID 90428e3ef1f178a49c92b303a4b5f11fee205982 # Parent 0851022edd4be902b9b6dbd5d2bebc2bd3737896 * lisp/cus-edit.el (custom-save-variables, custom-save-faces): Fix up indentation of inserted comment. diff -r 0851022edd4b -r 90428e3ef1f1 lisp/ChangeLog --- a/lisp/ChangeLog Wed Aug 11 20:47:34 2010 +0200 +++ b/lisp/ChangeLog Thu Aug 12 10:55:20 2010 +0200 @@ -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 -r 0851022edd4b -r 90428e3ef1f1 lisp/cus-edit.el --- a/lisp/cus-edit.el Wed Aug 11 20:47:34 2010 +0200 +++ b/lisp/cus-edit.el Thu Aug 12 10:55:20 2010 +0200 @@ -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))