Index: emacs/lisp/replace.el
diff -c emacs/lisp/replace.el:1.214 emacs/lisp/replace.el:1.215
*** emacs/lisp/replace.el:1.214 Sun Jun 26 02:38:08 2005
--- emacs/lisp/replace.el Thu Jun 30 13:01:26 2005
***************
*** 1045,1054 ****
(if (> count 0)
(progn
(display-buffer occur-buf)
! (setq next-error-last-buffer occur-buf))
(kill-buffer occur-buf)))
- (setq buffer-read-only t)
- (set-buffer-modified-p nil)
(run-hooks 'occur-hook)))))
(defun occur-engine-add-prefix (lines)
--- 1045,1054 ----
(if (> count 0)
(progn
(display-buffer occur-buf)
! (setq next-error-last-buffer occur-buf)
! (setq buffer-read-only t)
! (set-buffer-modified-p nil))
(kill-buffer occur-buf)))
(run-hooks 'occur-hook)))))
(defun occur-engine-add-prefix (lines)
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
