| … | |
… | |
| 190 | ); |
190 | ); |
| 191 | |
191 | |
| 192 | $dialog->grab_focus; |
192 | $dialog->grab_focus; |
| 193 | |
193 | |
| 194 | } elsif ($flags & CS_QUERY_SINGLECHAR) { |
194 | } elsif ($flags & CS_QUERY_SINGLECHAR) { |
| 195 | $dialog->{tooltip} = "Press a key (click on the entry to make sure it has keyboard focus)"; |
195 | $dialog->{tooltip} = "#charcreation_focus"; |
| 196 | |
196 | |
| 197 | if ($prompt =~ /Now choose a character|Press any key for the next race/i) { |
197 | if ($prompt =~ /Now choose a character|Press any key for the next race/i) { |
| 198 | $MESSAGE_WINDOW->show; |
198 | $MESSAGE_WINDOW->show; |
| 199 | |
199 | |
| 200 | unshift @dialog, new CFPlus::UI::Label |
200 | unshift @dialog, new CFPlus::UI::Label |
