… | |
… | |
2577 | ($x, $y) = (-1, -1) |
2577 | ($x, $y) = (-1, -1) |
2578 | unless (defined $x) && (defined $y); |
2578 | unless (defined $x) && (defined $y); |
2579 | |
2579 | |
2580 | # use -1 or undef as default coordinates, not 0, 0 |
2580 | # use -1 or undef as default coordinates, not 0, 0 |
2581 | ($x, $y) = ($map->enter_x, $map->enter_y) |
2581 | ($x, $y) = ($map->enter_x, $map->enter_y) |
2582 | if $x <=0 && $y <= 0; |
2582 | if $x <= 0 && $y <= 0; |
2583 | |
2583 | |
2584 | $map->load; |
2584 | $map->load; |
2585 | $map->load_neighbours; |
2585 | $map->load_neighbours; |
2586 | |
2586 | |
2587 | return unless $self->contr->active; |
2587 | return unless $self->contr->active; |