Mercurial > emacs

changeset 66996:cf7bf8dadf78

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 18 Nov 2005 19:42:08 +0000
parents e10f2e7919f0
children 05bf33a891c0
files lisp/longlines.el
diffstat 1 files changed, 7 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/longlines.el	Fri Nov 18 19:40:35 2005 +0000
+++ b/lisp/longlines.el	Fri Nov 18 19:42:08 2005 +0000
@@ -132,12 +132,6 @@
         (when (and longlines-show-hard-newlines
                    (not longlines-showing))
           (longlines-show-hard-newlines))
-        (when longlines-auto-wrap
-          (auto-fill-mode 0)
-          (add-hook 'after-change-functions
-                    'longlines-after-change-function nil t)
-          (add-hook 'post-command-hook
-                    'longlines-post-command-function nil t))
 
 	;; Hacks to make longlines play nice with various modes.
 	(cond ((eq major-mode 'mail-mode)
@@ -151,7 +145,13 @@
 			 (list message-indent-citation-function)))
 	       (add-to-list 'message-indent-citation-function
 			    'longlines-decode-region t)))
-	)
+
+        (when longlines-auto-wrap
+          (auto-fill-mode 0)
+          (add-hook 'after-change-functions
+                    'longlines-after-change-function nil t)
+          (add-hook 'post-command-hook
+                    'longlines-post-command-function nil t)))
     ;; Turn off longlines mode
     (setq buffer-file-format (delete 'longlines buffer-file-format))
     (if longlines-showing