# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1134122199 0
# Node ID 3ff7903b19d780f4db6e682a10e5eb7453cf2dac
# Parent  9e33a689772952749edb8b7adb712c5157d5ea5a
(locate): Disable undo in *Locate* buffer.

diff -r 9e33a6897729 -r 3ff7903b19d7 lisp/locate.el
--- a/lisp/locate.el	Fri Dec 09 09:48:36 2005 +0000
+++ b/lisp/locate.el	Fri Dec 09 09:56:39 2005 +0000
@@ -229,7 +229,8 @@
     (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)