aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman2002-09-09 00:26:14 +0000
committerRichard M. Stallman2002-09-09 00:26:14 +0000
commit99b398e0a4c501e2d7fe21eaed3eb61d254afb89 (patch)
tree8437220824a5157a2859ab071cf6724dee436699
parent27664fbec1d4c22098269b2abc065c82f319f24a (diff)
downloademacs-99b398e0a4c501e2d7fe21eaed3eb61d254afb89.tar.gz
emacs-99b398e0a4c501e2d7fe21eaed3eb61d254afb89.zip
(custom-save-variables, custom-save-faces):
Clarify the comments written into .emacs.
-rw-r--r--lisp/cus-edit.el12
1 files changed, 8 insertions, 4 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 770f8f723f8..9c8e6ce740b 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -3633,8 +3633,10 @@ or (if there were none) at the end of the buffer."
3633 (unless (bolp) 3633 (unless (bolp)
3634 (princ "\n")) 3634 (princ "\n"))
3635 (princ "(custom-set-variables 3635 (princ "(custom-set-variables
3636 ;; custom-set-variables was added by Custom -- don't edit or cut/paste it! 3636 ;; custom-set-variables was added by Custom.
3637 ;; Your init file should contain only one such instance.\n") 3637 ;; If you edit it by hand, you could mess it up, so be careful.
3638 ;; Your init file should contain only one such instance.
3639 ;; If there is more than one, they won't work right.\n")
3638 (mapcar 3640 (mapcar
3639 (lambda (symbol) 3641 (lambda (symbol)
3640 (let ((value (get symbol 'saved-value)) 3642 (let ((value (get symbol 'saved-value))
@@ -3697,8 +3699,10 @@ or (if there were none) at the end of the buffer."
3697 (unless (bolp) 3699 (unless (bolp)
3698 (princ "\n")) 3700 (princ "\n"))
3699 (princ "(custom-set-faces 3701 (princ "(custom-set-faces
3700 ;; custom-set-faces was added by Custom -- don't edit or cut/paste it! 3702 ;; custom-set-faces was added by Custom.
3701 ;; Your init file should contain only one such instance.\n") 3703 ;; If you edit it by hand, you could mess it up, so be careful.
3704 ;; Your init file should contain only one such instance.
3705 ;; If there is more than one, they won't work right.\n")
3702 (mapcar 3706 (mapcar
3703 (lambda (symbol) 3707 (lambda (symbol)
3704 (let ((value (get symbol 'saved-face)) 3708 (let ((value (get symbol 'saved-face))