# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1032880565 0
# Node ID 8094bb2ffe5b358a1f84d0962f8d767c667a1b38
# Parent  dae15ca3bea7baf01320049fd6501620adb7bbff
(eshell-occur-mode-mouse-goto, eshell-poor-mans-grep): Remove references to
`occur-buffer'.

diff -r dae15ca3bea7 -r 8094bb2ffe5b lisp/eshell/em-unix.el
--- a/lisp/eshell/em-unix.el	Tue Sep 24 10:18:05 2002 +0000
+++ b/lisp/eshell/em-unix.el	Tue Sep 24 15:16:05 2002 +0000
@@ -641,13 +641,12 @@
 (defun eshell-occur-mode-mouse-goto (event)
   "In Occur mode, go to the occurrence whose line you click on."
   (interactive "e")
-  (let (buffer pos)
+  (let (pos)
     (save-excursion
       (set-buffer (window-buffer (posn-window (event-end event))))
       (save-excursion
 	(goto-char (posn-point (event-end event)))
-	(setq pos (occur-mode-find-occurrence))
-	(setq buffer occur-buffer)))
+	(setq pos (occur-mode-find-occurrence))))
     (pop-to-buffer (marker-buffer pos))
     (goto-char (marker-position pos))))
 
@@ -683,7 +682,6 @@
 		(if string (insert string))
 		(setq string nil
 		      files (cdr files)))))
-	  (setq occur-buffer (current-buffer))
 	  (local-set-key [mouse-2] 'eshell-occur-mode-mouse-goto)
 	  (local-set-key [(control ?c) (control ?c)]
 			 'eshell-occur-mode-goto-occurrence)