Commit 04b5691b authored by Richard M. Stallman's avatar Richard M. Stallman

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

parent 80670155
......@@ -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;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment