(turn-off-auto-fill): New function.

2000-06-20 18:24:59 +00:00
parent e7cec0051a
commit 3a99c8191b
1 changed files with 5 additions and 0 deletions
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2868,6 +2868,11 @@ for `auto-fill-function' when turning Auto Fill mode on."
 (defun turn-on-auto-fill ()
  "Unconditionally turn on Auto Fill mode."
  (auto-fill-mode 1))
+
+(defun turn-off-auto-fill ()
+  "Unconditionally turn off Auto Fill mode."
+  (auto-fill-mode -1))
+
 (custom-add-option 'text-mode-hook 'turn-on-auto-fill)

 (defun set-fill-column (arg)