# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1132342928 0
# Node ID cf7bf8dadf789f7dca03d277364effb47954464f
# Parent  e10f2e7919f023e4183be08b29d042b26743d15b
*** empty log message ***

diff -r e10f2e7919f0 -r cf7bf8dadf78 lisp/longlines.el
--- 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