… | … | ||
---|---|---|---|
177 | CFClient::SDLK_LEFT, [7, "west"], | 177 | CFClient::SDLK_LEFT, [7, "west"], |
178 | ); | 178 | ); |
179 | 179 | ||
180 | sub key_down { | 180 | sub key_down { |
181 | my ($self, $ev) = @_; | 181 | my ($self, $ev) = @_; |
182 | |||
183 | return unless $::CONN; | ||
182 | 184 | ||
183 | my $mod = $ev->{mod}; | 185 | my $mod = $ev->{mod}; |
184 | my $sym = $ev->{sym}; | 186 | my $sym = $ev->{sym}; |
185 | 187 | ||
186 | if ($sym == CFClient::SDLK_KP5) { | 188 | if ($sym == CFClient::SDLK_KP5) { |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |