summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2005-11-28 19:18:51 +0000
committerChong Yidong <cyd@stupidchicken.com>2005-11-28 19:18:51 +0000
commit7e1d31d4604a0525afd6b25cb1bf31bd23fe9db9 (patch)
tree37f165730e83d1624533984a6399be94d99b9d85
parent6a99c272837ee61fa361007ffce3069feb704a32 (diff)
downloademacs-7e1d31d4604a0525afd6b25cb1bf31bd23fe9db9.tar.gz
* replace.el (occur-mode-goto-occurrence): Pop, don't switch.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/replace.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7d25566c12e..88004d84047 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-11-28 Chong Yidong <cyd@stupidchicken.com>
+
+ * replace.el (occur-mode-goto-occurrence): Pop, don't switch.
+
2005-11-28 Stefan Monnier <monnier@iro.umontreal.ca>
* textmodes/flyspell.el (flyspell-last-buffer): New var.
diff --git a/lisp/replace.el b/lisp/replace.el
index e74b8690c28..f269baef9f1 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -770,7 +770,7 @@ Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it.
"Go to the occurrence the current line describes."
(interactive)
(let ((pos (occur-mode-find-occurrence)))
- (switch-to-buffer (marker-buffer pos))
+ (pop-to-buffer (marker-buffer pos))
(goto-char pos)))
(defun occur-mode-goto-occurrence-other-window ()