From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 27 Oct 2005 01:36:31 +0000 (+0000)
Subject: * longlines.el (longlines-mode): Bind after-change-functions to
X-Git-Tag: emacs-pretest-22.0.90~6272
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a145b41c6b74f8528d51aa923a9d752549cf5066;p=emacs.git

* longlines.el (longlines-mode): Bind after-change-functions to
	nil during initial decoding and final encoding.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0df2b8dd7b2..376823dc7a8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-10-26  Chong Yidong  <cyd@stupidchicken.com>
+
+	* longlines.el (longlines-mode): Bind after-change-functions to
+	nil during initial decoding and final encoding.
+
 2005-10-26  Dan Nicolaescu  <dann@ics.uci.edu>
 
 	* term.el (term-emulate-terminal, term-handle-colors-array)
diff --git a/lisp/longlines.el b/lisp/longlines.el
index 7f372725b0e..4ee85d646e5 100644
--- a/lisp/longlines.el
+++ b/lisp/longlines.el
@@ -6,7 +6,7 @@
 ;;             Alex Schroeder <alex@gnu.org>
 ;;             Chong Yidong <cyd@stupidchicken.com>
 ;; Maintainer: Chong Yidong <cyd@stupidchicken.com>
-;; Keywords: convenience
+;; Keywords: convenience, wp
 
 ;; This file is part of GNU Emacs.
 
@@ -119,6 +119,7 @@ are indicated with a symbol."
                     'longlines-window-change-function nil t))
         (let ((buffer-undo-list t)
               (inhibit-read-only t)
+	      (after-change-functions nil)
               (mod (buffer-modified-p)))
           ;; Turning off undo is OK since (spaces + newlines) is
           ;; conserved, except for a corner case in
@@ -142,6 +143,7 @@ are indicated with a symbol."
     (if longlines-showing
         (longlines-unshow-hard-newlines))
     (let ((buffer-undo-list t)
+	  (after-change-functions nil)
           (inhibit-read-only t))
       (save-restriction
 	(widen)