Commit 8121414a authored by Chong Yidong's avatar Chong Yidong
Browse files

(occur-engine): buffer-undo-list binding moved...

(occur-1): ...to here.
parent a06494d0
......@@ -1049,7 +1049,9 @@ See also `multi-occur'."
(with-current-buffer occur-buf
(occur-mode)
(let ((inhibit-read-only t))
(let ((inhibit-read-only t)
;; Don't generate undo entries for creation of the initial contents.
(buffer-undo-list t))
(erase-buffer)
(let ((count (occur-engine
regexp active-bufs occur-buf
......@@ -1086,8 +1088,6 @@ 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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment