From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 9 Aug 2005 11:29:18 +0000 (+0000)
Subject: (occur-engine): Initial *Occur* output not undoable.
X-Git-Tag: emacs-pretest-22.0.90~7713
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=882effdb17c9755edd6f064be58d87d5b8911d9b;p=emacs.git

(occur-engine): Initial *Occur* output not undoable.
---

diff --git a/lisp/replace.el b/lisp/replace.el
index 6ce961c28a7..ea1bd53e688 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1061,6 +1061,8 @@ See also `multi-occur'."
 			    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)