(locate): Disable undo in *Locate* buffer.

(locate): Disable undo in Locate buffer.
e242b6c4 · Juri Linkov · 67019e7f · e242b6c4
Commit e242b6c4 authored Dec 09, 2005 by Juri Linkov
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/locate.el lisp/locate.el +2 -1

No files found.
--- a/lisp/locate.el
+++ b/lisp/locate.el
@@ -229,7 +229,8 @@ With prefix arg, prompt for the locate command to run."
    (save-window-excursion
      (set-buffer (get-buffer-create locate-buffer-name))
      (locate-mode)
-      (let ((inhibit-read-only t))
+      (let ((inhibit-read-only t)
+	    (buffer-undo-list t))
 	(erase-buffer)

 	(setq locate-current-filter filter)