From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Thu, 17 Nov 2005 22:46:56 +0000 (+0000)
Subject: (fill-flowed): Bind adaptive-fill-mode to nil.
X-Git-Url: https://cgit.sxemacs.org/?a=commitdiff_plain;h=313531b2106aaae3abba673cd3952a8f6d95a46c;p=gnus

(fill-flowed): Bind adaptive-fill-mode to nil.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f7074bd61..31a09693a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-11-17  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+	* flow-fill.el (fill-flowed): Bind adaptive-fill-mode to nil. 
+
 2005-11-16  Boris Samorodov <bsam@ipt.ru>  (tiny patch)
 
 	* imap.el (imap-kerberos4-open): Ignore SSL stuff.
diff --git a/lisp/flow-fill.el b/lisp/flow-fill.el
index a61e54ef3..7355dbd01 100644
--- a/lisp/flow-fill.el
+++ b/lisp/flow-fill.el
@@ -140,7 +140,8 @@ RFC 2646 suggests 66 characters for readability."
 	    (condition-case nil
 		(let ((fill-prefix (when quote (concat quote " ")))
 		      (fill-column (eval fill-flowed-display-column))
-		      filladapt-mode)
+		      filladapt-mode
+		      adaptive-fill-mode)
 		  (fill-region (point-at-bol)
 			       (min (1+ (point-at-eol))
 				    (point-max))