unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH] Use correct indentation in customize
@ 2010-08-10 22:33 Antoine Levitt
  2010-08-12  9:01 ` Stefan Monnier
  0 siblings, 1 reply; 2+ messages in thread
From: Antoine Levitt @ 2010-08-10 22:33 UTC (permalink / raw)
  To: emacs-devel

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))




^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: [PATCH] Use correct indentation in customize
  2010-08-10 22:33 [PATCH] Use correct indentation in customize Antoine Levitt
@ 2010-08-12  9:01 ` Stefan Monnier
  0 siblings, 0 replies; 2+ messages in thread
From: Stefan Monnier @ 2010-08-12  9:01 UTC (permalink / raw)
  To: Antoine Levitt; +Cc: emacs-devel

> 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.

Thanks, installed,


        Stefan


> === 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))




^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2010-08-12  9:01 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2010-08-10 22:33 [PATCH] Use correct indentation in customize Antoine Levitt
2010-08-12  9:01 ` Stefan Monnier

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).