/[emacs]/emacs/lisp/replace.el
ViewVC logotype

Diff of /emacs/lisp/replace.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.227 by rfrancoise, Thu Oct 27 18:22:00 2005 UTC revision 1.228 by rms, Sat Oct 29 19:49:20 2005 UTC
# Line 755  Alternatively, click \\[occur-mode-mouse Line 755  Alternatively, click \\[occur-mode-mouse
755        (save-excursion        (save-excursion
756          (goto-char (posn-point (event-end event)))          (goto-char (posn-point (event-end event)))
757          (setq pos (occur-mode-find-occurrence))))          (setq pos (occur-mode-find-occurrence))))
758      (pop-to-buffer (marker-buffer pos))      (switch-to-buffer-other-window (marker-buffer pos))
759      (goto-char pos)))      (goto-char pos)))
760    
761  (defun occur-mode-find-occurrence ()  (defun occur-mode-find-occurrence ()
# Line 770  Alternatively, click \\[occur-mode-mouse Line 770  Alternatively, click \\[occur-mode-mouse
770    "Go to the occurrence the current line describes."    "Go to the occurrence the current line describes."
771    (interactive)    (interactive)
772    (let ((pos (occur-mode-find-occurrence)))    (let ((pos (occur-mode-find-occurrence)))
773      (pop-to-buffer (marker-buffer pos))      (switch-to-buffer (marker-buffer pos))
774      (goto-char pos)))      (goto-char pos)))
775    
776  (defun occur-mode-goto-occurrence-other-window ()  (defun occur-mode-goto-occurrence-other-window ()

Legend:
Removed from v.1.227  
changed lines
  Added in v.1.228

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26