| … | … | ||
|---|---|---|---|
| 31 | } | 31 | } |
| 32 | 32 | ||
| 33 | $pl | 33 | $pl |
| 34 | } | 34 | } |
| 35 | 35 | ||
| 36 | sub on_move { | 36 | sub on_monster_move { |
| 37 | my ($self, $enemy) = @_; | 37 | my ($self, $enemy) = @_; |
| 38 | 38 | ||
| 39 | if (my $pl = find_target_player $self) { | 39 | if (my $pl = find_target_player $self) { |
| 40 | my ($d, undef, undef, $dir, undef) = $self->rangevector ($pl); | 40 | my ($d, undef, undef, $dir, undef) = $self->rangevector ($pl); |
| 41 | 41 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |