src/menu.c (Fx_popup_dialog): Comment the use of Qunsupported__w32_dialog.

This commit is contained in:
Eli Zaretskii 2014-06-04 18:16:54 +03:00
parent 680a6ad932
commit b1b4013662

View file

@ -1434,7 +1434,7 @@ no quit occurs and `x-popup-menu' returns nil. */)
return selection;
}
/* If F's terminal is not capable to display popup dialog,
/* If F's terminal is not capable of displaying a popup dialog,
emulate it with a menu. */
static Lisp_Object
@ -1457,7 +1457,7 @@ emulate_dialog_with_menu (struct frame *f, Lisp_Object contents)
x_coord -= SCHARS (prompt);
y_coord = FRAME_LINES (f);
}
XSETFRAME (frame, f);
XSETINT (x, x_coord / 2);
XSETINT (y, y_coord / 2);
@ -1546,9 +1546,12 @@ for instance using the window manager, then this produces a quit and
Lisp_Object selection
= FRAME_TERMINAL (f)->popup_dialog_hook (f, header, contents);
#ifdef HAVE_NTGUI
/* NTGUI supports only simple dialogs with Yes/No choices. For
other dialogs, it returns the symbol 'unsupported--w32-dialog',
as a signal for the caller to fall back to the emulation code. */
if (!EQ (selection, Qunsupported__w32_dialog))
#endif
return selection;
#endif
return selection;
}
/* ... or emulate it with a menu. */
return emulate_dialog_with_menu (f, contents);