# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 739905360 0
# Node ID 2d6cd35210f37fe7db465be15e0a6dd6c034a2ad
# Parent  82856e3ea14d6f5f6c726e91bc7148fb8672b986
(read_minibuf): Set and use mini_frame only if MULTI_FRAME.

diff -r 82856e3ea14d -r 2d6cd35210f3 src/minibuf.c
--- a/src/minibuf.c	Sat Jun 12 17:10:13 1993 +0000
+++ b/src/minibuf.c	Sat Jun 12 17:16:00 1993 +0000
@@ -106,14 +106,14 @@
      Lisp_Object map;
      Lisp_Object initial;
      Lisp_Object prompt;
-     int backup_n;
+     Lisp_Object backup_n;
      int expflag;
      Lisp_Object histvar;
      Lisp_Object histpos;
 {
   register Lisp_Object val;
   int count = specpdl_ptr - specpdl;
-  Lisp_Object mini_frame = WINDOW_FRAME (XWINDOW (minibuf_window));
+  Lisp_Object mini_frame;
   struct gcpro gcpro1, gcpro2;
 
   if (XTYPE (prompt) != Lisp_String)
@@ -153,11 +153,12 @@
 
   /* If the minibuffer window is on a different frame, save that
      frame's configuration too.  */
+#ifdef MULTI_FRAME
+  XSET (mini_frame, Lisp_Frame, WINDOW_FRAME (XWINDOW (minibuf_window)));
   if (XFRAME (mini_frame) != selected_frame)
-    {
-      record_unwind_protect (Fset_window_configuration,
-			     Fcurrent_window_configuration (mini_frame));
-    }
+    record_unwind_protect (Fset_window_configuration,
+			   Fcurrent_window_configuration (mini_frame));
+#endif
 
   val = current_buffer->directory;
   Fset_buffer (get_minibuffer (minibuf_level));