mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-31 09:20:54 -08:00
Code Issues Projects Releases Wiki Activity

(decode-coding-inserted-region): Don't

Browse source 
barf if `buffer-undo-list' is already set to `t'.
This commit is contained in:
David Kastrup 2004-12-29 10:06:44 +00:00
parent a2db4c6b3b
commit f4b483aa36
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2004-12-29 David Kastrup <dak@gnu.org>
* international/mule.el (decode-coding-inserted-region): Don't
barf if `buffer-undo-list' is already set to `t'.
2004-12-29 Jay Belanger <belanger@truman.edu>
* calc/calc-prog.el (calc-user-define-formula): Put default values

2
lisp/international/mule.el
View file

@ -1893,7 +1893,7 @@ Part of the job of this function is setting `buffer-undo-list' appropriately."
;; Otherwise, if we can recognize the undo elt for the insertion,
;; remove it and get ready to replace it later.
;; In the mean time, turn off undo recording.
(let ((last (car buffer-undo-list)))
(let ((last (car-safe buffer-undo-list)))
(if (and (consp last) (eql (car last) from) (eql (cdr last) to))
(setq undo-list-saved (cdr buffer-undo-list)
buffer-undo-list t))))