(Fyes_or_no_p) [USE_X_TOOLKIT]: Display just one menu.

1994-03-19 16:20:31 +00:00
parent 80670155d2
commit 04b5691b39
1 changed files with 2 additions and 0 deletions
--- a/src/fns.c
+++ b/src/fns.c
@@ -1241,12 +1241,14 @@ and can edit it until it as been confirmed.")
      GCPRO1 (pane);
      menu = Fcons (prompt, Fcons (Fcons (prompt, pane), Qnil));
      obj = Fx_popup_dialog (Qt, menu);
+#ifndef USE_X_TOOLKIT
      if (!NILP (obj))
 	{
 	  prompt = build_string ("Confirm");
 	  menu = Fcons (prompt, Fcons (Fcons (prompt, pane), Qnil));
 	  obj = Fx_popup_dialog (Qt, menu);
 	}
+#endif
      UNGCPRO;
      return obj;
    }