[Emacs-diffs] Changes to emacs/lisp/international/mule.el

[David Kastrup]

Index: emacs/lisp/international/mule.el
diff -c emacs/lisp/international/mule.el:1.210 
emacs/lisp/international/mule.el:1.211
*** emacs/lisp/international/mule.el:1.210      Wed Dec 29 01:25:15 2004
--- emacs/lisp/international/mule.el    Wed Dec 29 10:06:44 2004
***************
*** 1893,1899 ****
          ;; 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))) 
            (if (and (consp last) (eql (car last) from) (eql (cdr last) to))
                (setq undo-list-saved (cdr buffer-undo-list)
                      buffer-undo-list t))))
--- 1893,1899 ----
          ;; 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-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))))