# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 780360587 0
# Node ID d69f3bc2e845bbe8b9a574c5dc4523f076331398
# Parent  5da502223e2037c4a21fc7357faffef0c6d5f4ec
(prev_frame): Fix typo.

diff -r 5da502223e20 -r d69f3bc2e845 src/frame.c
--- a/src/frame.c	Fri Sep 23 22:33:05 1994 +0000
+++ b/src/frame.c	Fri Sep 23 22:49:47 1994 +0000
@@ -670,7 +670,7 @@
 	  if (! FRAME_MINIBUF_ONLY_P (XFRAME (f)))
 	    prev = f;
 	}
-      else if (XTYPE (minibuf) == Lisp_Window)
+      else if (WINDOWP (minibuf))
 	{
 	  if (EQ (FRAME_MINIBUF_WINDOW (XFRAME (f)), minibuf)
 	      /* Check that F either is, or has forwarded its focus to,
@@ -686,7 +686,7 @@
 	  if (FRAME_VISIBLE_P (XFRAME (f)))
 	    prev = f;
 	}
-      else if (XFASTINT (f) == 0)
+      else if (XFASTINT (minibuf) == 0)
 	{
 	  FRAME_SAMPLE_VISIBILITY (XFRAME (f));
 	  if (FRAME_VISIBLE_P (XFRAME (f))