|
Lines 907-914
Link Here
|
| 907 |
} |
907 |
} |
| 908 |
} |
908 |
} |
| 909 |
|
909 |
|
| 910 |
if ($event->type == SDL_QUIT || |
910 |
if ($event->type == SDL_QUIT){ exit 0;} |
| 911 |
$event->type == SDL_KEYDOWN && $event->key_sym == SDLK_ESCAPE) { |
911 |
if ($event->type == SDL_KEYDOWN && $event->key_sym == SDLK_ESCAPE) { |
| 912 |
die 'quit'; |
912 |
die 'quit'; |
| 913 |
} |
913 |
} |
| 914 |
} |
914 |
} |
|
Lines 2146-2151
Link Here
|
| 2146 |
|
2146 |
|
| 2147 |
$event->pump; |
2147 |
$event->pump; |
| 2148 |
if ($event->poll != 0) { |
2148 |
if ($event->poll != 0) { |
|
|
2149 |
if ($event->type == SDL_QUIT) {exit 0;} |
| 2149 |
if ($event->type == SDL_KEYDOWN) { |
2150 |
if ($event->type == SDL_KEYDOWN) { |
| 2150 |
my $keypressed = $event->key_sym; |
2151 |
my $keypressed = $event->key_sym; |
| 2151 |
if (member($keypressed, (SDLK_DOWN, SDLK_RIGHT)) && $current_pos < max(map { $menu_entries{$_}->{pos} } keys %menu_entries)) { |
2152 |
if (member($keypressed, (SDLK_DOWN, SDLK_RIGHT)) && $current_pos < max(map { $menu_entries{$_}->{pos} } keys %menu_entries)) { |
