summaryrefslogtreecommitdiff
path: root/src/fl_ask.cxx
diff options
context:
space:
mode:
authorMatthias Melcher <fltk@matthiasm.com>2007-11-19 16:21:19 +0000
committerMatthias Melcher <fltk@matthiasm.com>2007-11-19 16:21:19 +0000
commitd2242d59ef11429f02b3c032d4bd786e4c3dafc9 (patch)
tree64a392bc1a1b756b5ec530c5482292c505928d92 /src/fl_ask.cxx
parentba396b3ea4fa6e2d7c488e0c0897eebd76f5bf21 (diff)
STR 1745: in fl_ask, if the rightmost button has a shortcut in its label, the default 'Escape' is overridden.
git-svn-id: file:///fltk/svn/fltk/branches/branch-1.1@5981 ea41ed52-d2ee-0310-a9c1-e6b18d33e121
Diffstat (limited to 'src/fl_ask.cxx')
-rw-r--r--src/fl_ask.cxx5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/fl_ask.cxx b/src/fl_ask.cxx
index 4dec560ad..0f9abcbb5 100644
--- a/src/fl_ask.cxx
+++ b/src/fl_ask.cxx
@@ -202,6 +202,11 @@ static int innards(const char* fmt, va_list ap,
if (button[1]->visible() && !input->visible())
button[1]->take_focus();
message_form->hotspot(button[0]);
+ if (b0 && Fl_Widget::label_shortcut(b0))
+ button[0]->shortcut(0);
+ else
+ button[0]->shortcut(FL_Escape);
+
message_form->show();
int r;
for (;;) {