From: Nick Roberts <nickrob@snap.net.nz>
Date: Tue, 24 May 2005 10:27:22 +0000 (+0000)
Subject: (Fyes_or_no_p, Fy_or_n_p): Call Fx_popup_dialog with
X-Git-Tag: ttn-vms-21-2-B4~22
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f0a31d705523185ab5507ab7d2aee00fb9d46bd4;p=emacs.git

(Fyes_or_no_p, Fy_or_n_p): Call Fx_popup_dialog with
a third argument (Qnil).
---

diff --git a/src/fns.c b/src/fns.c
index 216852f893e..bd3893f7538 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -3276,7 +3276,7 @@ is nil and `use-dialog-box' is non-nil.  */)
 			Fcons (Fcons (build_string ("No"), Qnil),
 			       Qnil));
 	  menu = Fcons (prompt, pane);
-	  obj = Fx_popup_dialog (Qt, menu);
+	  obj = Fx_popup_dialog (Qt, menu, Qnil);
 	  answer = !NILP (obj);
 	  break;
 	}
@@ -3408,7 +3408,7 @@ is nil, and `use-dialog-box' is non-nil.  */)
 			   Qnil));
       GCPRO1 (pane);
       menu = Fcons (prompt, pane);
-      obj = Fx_popup_dialog (Qt, menu);
+      obj = Fx_popup_dialog (Qt, menu, Qnil);
       UNGCPRO;
       return obj;
     }