* ediff-init.el (ediff-get-next-window): bug fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0b4a17dc047fcef0fa231c5a050238d5eba8d9e8..16a3d5e99d49a2375350e3c29b047e801da054c0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-23  Michael Kifer  <kifer@cs.stonybrook.edu>
+       
+       * ediff-init.el (ediff-get-next-window): bug fix.
+       
 2002-09-22  Richard M. Stallman  <rms@gnu.org>
 
        * international/mule-cmds.el (select-safe-coding-system): Cope if

diff --git a/lisp/ediff-init.el b/lisp/ediff-init.el
index 7b540ad710c61f87e81f584247b6ba9620eb550a..01c9b1e129af2ad1e1199214539a39bd699531ef 100644 (file)
--- a/lisp/ediff-init.el
+++ b/lisp/ediff-init.el
@@ -1373,10 +1373,10 @@ This default should work without changes."
   (cdr (assq 'unsplittable (frame-parameters frame))))
 
 (defsubst ediff-get-next-window (wind prev-wind)
-  (or (window-live-p wind)
-      (setq wind (if prev-wind
-                    (next-window wind)
-                  (selected-window)))))
+  (cond ((window-live-p wind) wind)
+       (prev-wind (next-window wind))
+       (t (selected-window))
+       ))
 
 
 (defsubst ediff-kill-buffer-carefully (buf)