changeset 61812:a9a70941ccb3

(mode-require-final-newline): Fix previous change. (require-final-newline): Fix type label.
author Richard M. Stallman <rms@gnu.org>
date Sun, 24 Apr 2005 21:29:15 +0000
parents d15bf442151d
children 13d42889189f
files lisp/files.el
diffstat 1 files changed, 8 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Sun Apr 24 21:02:20 2005 +0000
+++ b/lisp/files.el	Sun Apr 24 21:29:15 2005 +0000
@@ -286,7 +286,7 @@
   :type '(choice (const :tag "When visiting" visit)
 		 (const :tag "When saving" t)
 		 (const :tag "When visiting or saving" visit-save)
-		 (const :tag "Never" nil)
+		 (const :tag "Don't add newlines" nil)
 		 (other :tag "Ask" ask))
   :group 'editing-basics)
 
@@ -300,15 +300,16 @@
 A value of `visit' means do this right after the file is visited.
 A value of `visit-save' means do it at both of those times.
 Any other non-nil value means ask user whether to add a newline, when saving.
-nil means do not add newlines when saving.
-
-If you set this to nil, you must be careful to manually add a final newline
-whenever you save a file that really needs one."
+
+nil means do not add newlines.  That is a risky choice in this variable
+since this value is used for modes for files that ought to have final newlines.
+So if you set this to nil, you must explicitly check and add
+a final newline, whenever you save a file that really needs one."
   :type '(choice (const :tag "When visiting" visit)
 		 (const :tag "When saving" t)
 		 (const :tag "When visiting or saving" visit-save)
-		 (other :tag "Ask" ask)
-		 (const :tag "Don't add newlines" nil))
+		 (const :tag "Don't add newlines" nil)
+		 (other :tag "Ask each time" ask))
   :group 'editing-basics
   :version "22.1")