# HG changeset patch # User Richard M. Stallman # Date 1123586958 0 # Node ID 6697c9af363184e998ecf403041d56e9596005ba # Parent 518cb89f1f954bd7fb77dae6b63ed5b9f2204329 (occur-engine): Initial *Occur* output not undoable. diff -r 518cb89f1f95 -r 6697c9af3631 lisp/replace.el --- a/lisp/replace.el Tue Aug 09 11:28:26 2005 +0000 +++ b/lisp/replace.el Tue Aug 09 11:29:18 2005 +0000 @@ -1061,6 +1061,8 @@ title-face prefix-face match-face keep-props) (with-current-buffer out-buf (let ((globalcount 0) + ;; Don't generate undo entries for creation of the initial contents. + (buffer-undo-list t) (coding nil)) ;; Map over all the buffers (dolist (buf buffers)