Mercurial > hg > xemacs-beta

changeset 4044:e3cad3fd1be4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-06-29 09:44:42 by stephent] Don't cycle through hidden frames. <87sl8b13zj.fsf@uwakimon.sk.tsukuba.ac.jp>
author stephent
date Fri, 29 Jun 2007 09:44:43 +0000
parents b325de44db27
children c4782583fa71
files lisp/ChangeLog lisp/frame.el
diffstat 2 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Jun 29 08:17:46 2007 +0000
+++ b/lisp/ChangeLog	Fri Jun 29 09:44:43 2007 +0000
@@ -1,3 +1,7 @@
+2007-06-19  Ron Isaacson  <Ron.Isaacson@morganstanley.com>
+
+	* frame.el (other-frame): Stop other-frame cycling through all frames.
+
 2007-06-19  Ron Isaacson  <Ron.Isaacson@morganstanley.com>
 
 	* modeline.el (modeline-update-tty-frame-specifier): Don't use
--- a/lisp/frame.el	Fri Jun 29 08:17:46 2007 +0000
+++ b/lisp/frame.el	Fri Jun 29 09:44:43 2007 +0000
@@ -793,13 +793,9 @@
   (let ((frame (selected-frame)))
     (while (> arg 0)
       (setq frame (next-frame frame 'visible-nomini))
-      (while (not (eq (frame-visible-p frame) t))
-	(setq frame (next-frame frame 'visible-nomini)))
       (setq arg (1- arg)))
     (while (< arg 0)
       (setq frame (previous-frame frame 'visible-nomini))
-      (while (not (eq (frame-visible-p frame) t))
-	(setq frame (previous-frame frame 'visible-nomini)))
       (setq arg (1+ arg)))
     (select-frame-set-input-focus frame)))