# HG changeset patch
# User Didier Verna <didier@lrde.epita.fr>
# Date 1308812135 -7200
# Node ID 9a046b2e64943a1bc9f4b470eaaae5aa3a5d50c1
# Parent  2a6a8da4dd7c1ab2c8455e82a4901ca853db1790
Fix get-other-frame bug.

-------------------- ChangeLog entries follow: --------------------

lisp/ChangeLog addition:

2011-06-23  Didier Verna  <didier@xemacs.org>

	From smitchel <smitchel@bnin.net>
	* frame.el (get-other-frame): Add missing first argument THIS to
	the call to NEXT-FRAME.

diff -r 2a6a8da4dd7c -r 9a046b2e6494 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Jun 19 19:47:13 2011 +0100
+++ b/lisp/ChangeLog	Thu Jun 23 08:55:35 2011 +0200
@@ -1,3 +1,9 @@
+2011-06-23  Didier Verna  <didier@xemacs.org>
+
+	From smitchel <smitchel@bnin.net>
+	* frame.el (get-other-frame): Add missing first argument THIS to
+	the call to NEXT-FRAME.
+
 2011-06-19  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* cl-macs.el (cl-defsubst-expand):
diff -r 2a6a8da4dd7c -r 9a046b2e6494 lisp/frame.el
--- a/lisp/frame.el	Sun Jun 19 19:47:13 2011 +0100
+++ b/lisp/frame.el	Thu Jun 23 08:55:35 2011 +0200
@@ -602,7 +602,7 @@
 	 (next (next-frame this 'visible-nomini)))
     ;; then search iconified frames
     (if (eq this next)
-	(setq next (next-frame 'visible-iconic-nomini)))
+	(setq next (next-frame this 'visible-iconic-nomini)))
     (if (eq this next)
 	;; otherwise, make a new frame
 	(make-frame)