diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/longlines.el | 4 |
2 files changed, 8 insertions, 1 deletions
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) |