… | |
… | |
282 | } |
282 | } |
283 | |
283 | |
284 | if ($exit and $exit->{slaying} !~ /^!/) { |
284 | if ($exit and $exit->{slaying} !~ /^!/) { |
285 | my $dest = map2abs ($exit->{slaying}, $mape); |
285 | my $dest = map2abs ($exit->{slaying}, $mape); |
286 | # XXX: Replace with statusbar message |
286 | # XXX: Replace with statusbar message |
287 | unless (-e $dest) { |
287 | unless (-f $dest) { |
288 | warn "Couldn't find '$dest'"; |
288 | quick_msg ($mape, "Couldn't find map file at '$dest'", 1); |
289 | return |
289 | return |
290 | } |
290 | } |
291 | $::MAINWIN->open_map_editor ($dest); |
291 | $::MAINWIN->open_map_editor ($dest); |
292 | } |
292 | } |
293 | } |
293 | } |