diff lisp/replace.el @ 76749:6a1a4e97079e

(occur-next-error): *Occur* might not be displayed in the selected frame. Reported by David Hansen <[e-mail]>.

--- a/lisp/replace.el	Mon Mar 26 10:20:27 2007 +0000
+++ b/lisp/replace.el	Mon Mar 26 15:09:52 2007 +0000
@@ -844,7 +844,8 @@
        #'next-single-property-change)
      "No more matches")
     ;; In case the *Occur* buffer is visible in a nonselected window.
-    (set-window-point (get-buffer-window (current-buffer)) (point))
+    (let ((win (get-buffer-window (current-buffer) t)))
+      (if win (set-window-point win (point))))
     (occur-mode-goto-occurrence)))
 
 (defface match