changeset 4681:64ac4337298b

Implement turn-off-auto-fill. simple.el (turn-off-auto-fill): Sync from FSF 21.4.
author Malcolm Purvis <malcolmp@xemacs.org>
date Wed, 19 Aug 2009 23:06:32 +1000
parents 891381effa11
children 648f4a0dac3e
files lisp/ChangeLog lisp/simple.el
diffstat 2 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Tue Aug 18 12:34:34 2009 +0100
+++ b/lisp/ChangeLog	Wed Aug 19 23:06:32 2009 +1000
@@ -1,3 +1,8 @@
+2009-08-19  Malcolm Purvis  <malcolmp@xemacs.org>
+
+	* simple.el:
+	* simple.el (turn-off-auto-fill): Sync from FSF 21.4.
+
 2009-08-18  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* simple.el (handle-pre-motion-command-current-command-is-motion):
--- a/lisp/simple.el	Tue Aug 18 12:34:34 2009 +0100
+++ b/lisp/simple.el	Wed Aug 19 23:06:32 2009 +1000
@@ -3060,6 +3060,11 @@
   (interactive)
   (auto-fill-mode 1))
 
+(defun turn-off-auto-fill ()
+  "Unconditionally turn off Auto Fill mode."
+  (interactive)
+  (auto-fill-mode -1))
+
 (defun set-fill-column (arg)
   "Set `fill-column' to specified argument.
 Just \\[universal-argument] as argument means to use the current column