[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[PATCH] Use correct indentation in customize
From: |
Antoine Levitt |
Subject: |
[PATCH] Use correct indentation in customize |
Date: |
Tue, 10 Aug 2010 23:33:28 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) |
Hi,
I noticed that when customize writes its stuff to .emacs (or
custom-file), the indentation of the accompanying comment is off by a
column. This is a trivial issue, but I like to indent obsessively my
files. Since I keep .emacs under version control, this generates useless
diffs that have been bugging me for a while. So here's the patch to fix
it, which should be a no-brainer to merge.
Antoine Levitt
=== modified file 'lisp/cus-edit.el'
--- lisp/cus-edit.el | 2010-04-20 18:52:07 +0000
+++ lisp/cus-edit.el 2010-08-10 22:21: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))
- [PATCH] Use correct indentation in customize,
Antoine Levitt <=