summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
authorLuc Teirlinck <teirllm@auburn.edu>2005-04-01 04:48:39 +0000
committerLuc Teirlinck <teirllm@auburn.edu>2005-04-01 04:48:39 +0000
commit5e9961be68adf22b0fe1190fe67fb79ddfa2de55 (patch)
tree8d0dd7bfa90a0134b66e7e8eef96eeff737735bb /lisp/files.el
parentea98eb11f5549737255e90512969014777723f04 (diff)
downloademacs-5e9961be68adf22b0fe1190fe67fb79ddfa2de55.tar.gz
(mode-require-final-newline): Make Custom correctly report a nil value
and allow to set it to nil via Custom. Doc fix.
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el10
1 files changed, 8 insertions, 2 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 15d6f794e16..eca86c52a79 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -291,7 +291,7 @@ from `mode-require-final-newline'."
:group 'editing-basics)
(defcustom mode-require-final-newline t
- "*Whether to add a newline at the end of the file, in certain major modes.
+ "*Whether to add a newline at end of file, in certain major modes.
Those modes set `require-final-newline' to this value when you enable them.
They do so because they are used for files that are supposed
to end in newlines, and the question is how to arrange that.
@@ -299,10 +299,16 @@ to end in newlines, and the question is how to arrange that.
A value of t means do this only when the file is about to be saved.
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."
+Any other non-nil value means ask user whether to add a newline, when saving.
+nil means don't add newlines.
+
+You will have to be careful if you set this to nil: you will have
+to remember to manually add a final newline whenever you finish 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)
+ (const :tag "Never" nil)
(other :tag "Ask" ask))
:group 'editing-basics
:version "22.1")