aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/replace.el
diff options
context:
space:
mode:
authorRichard M. Stallman2005-10-29 19:49:20 +0000
committerRichard M. Stallman2005-10-29 19:49:20 +0000
commit932af01bc5a5c642955a3ea744f24b4eb7bf5c7c (patch)
tree55f8b023aa6c33fd9787730916064b339f172228 /lisp/replace.el
parentcb3b2ec005a979ab69419fc963e5341782b1cf66 (diff)
downloademacs-932af01bc5a5c642955a3ea744f24b4eb7bf5c7c.tar.gz
emacs-932af01bc5a5c642955a3ea744f24b4eb7bf5c7c.zip
(occur-mode-mouse-goto): Always go to other window.
(occur-mode-goto-occurrence): Always switch in same window.
Diffstat (limited to 'lisp/replace.el')
-rw-r--r--lisp/replace.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/replace.el b/lisp/replace.el
index 31963f7538c..1d5c2a7c7c4 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -755,7 +755,7 @@ Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it.
755 (save-excursion 755 (save-excursion
756 (goto-char (posn-point (event-end event))) 756 (goto-char (posn-point (event-end event)))
757 (setq pos (occur-mode-find-occurrence)))) 757 (setq pos (occur-mode-find-occurrence))))
758 (pop-to-buffer (marker-buffer pos)) 758 (switch-to-buffer-other-window (marker-buffer pos))
759 (goto-char pos))) 759 (goto-char pos)))
760 760
761(defun occur-mode-find-occurrence () 761(defun occur-mode-find-occurrence ()
@@ -770,7 +770,7 @@ Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it.
770 "Go to the occurrence the current line describes." 770 "Go to the occurrence the current line describes."
771 (interactive) 771 (interactive)
772 (let ((pos (occur-mode-find-occurrence))) 772 (let ((pos (occur-mode-find-occurrence)))
773 (pop-to-buffer (marker-buffer pos)) 773 (switch-to-buffer (marker-buffer pos))
774 (goto-char pos))) 774 (goto-char pos)))
775 775
776(defun occur-mode-goto-occurrence-other-window () 776(defun occur-mode-goto-occurrence-other-window ()