… | |
… | |
331 | my $uni = $ev->{unicode}; |
331 | my $uni = $ev->{unicode}; |
332 | |
332 | |
333 | $mod &= CFPlus::KMOD_CTRL | CFPlus::KMOD_ALT | CFPlus::KMOD_SHIFT; |
333 | $mod &= CFPlus::KMOD_CTRL | CFPlus::KMOD_ALT | CFPlus::KMOD_SHIFT; |
334 | |
334 | |
335 | if ($sym == 9) { |
335 | if ($sym == 9) { |
336 | ($mod & CFPlus::KMOD_SHIFT ? $::CONSOLE->{window} : $::PL_WINDOW)->toggle_visibility; |
336 | ($mod & CFPlus::KMOD_SHIFT ? $::MESSAGE_WINDOW : $::PL_WINDOW)->toggle_visibility; |
337 | } elsif ($sym == CFPlus::SDLK_F1 && !$mod) { |
337 | } elsif ($sym == CFPlus::SDLK_F1 && !$mod) { |
338 | $::HELP_WINDOW->toggle_visibility; |
338 | $::HELP_WINDOW->toggle_visibility; |
339 | } elsif ($sym == CFPlus::SDLK_F2 && !$mod) { |
339 | } elsif ($sym == CFPlus::SDLK_F2 && !$mod) { |
340 | ::toggle_player_page ($::STATS_PAGE); |
340 | ::toggle_player_page ($::STATS_PAGE); |
341 | } elsif ($sym == CFPlus::SDLK_F3 && !$mod) { |
341 | } elsif ($sym == CFPlus::SDLK_F3 && !$mod) { |