| … | … | ||
|---|---|---|---|
| 4 | 4 | ||
| 5 | =cut | 5 | =cut |
| 6 | 6 | ||
| 7 | package Deliantra; | 7 | package Deliantra; |
| 8 | 8 | ||
| 9 | our $VERSION = '1.23'; | 9 | our $VERSION = '1.24'; |
| 10 | 10 | ||
| 11 | use strict; | 11 | use common::sense; |
| 12 | 12 | ||
| 13 | use base 'Exporter'; | 13 | use base 'Exporter'; |
| 14 | 14 | ||
| 15 | use Carp (); | 15 | use Carp (); |
| 16 | use File::Spec; | 16 | use File::Spec; |
| … | … | ||
| 151 | boat => MOVE_BOAT, | 151 | boat => MOVE_BOAT, |
| 152 | ship => MOVE_SHIP, | 152 | ship => MOVE_SHIP, |
| 153 | all => MOVE_ALL, | 153 | all => MOVE_ALL, |
| 154 | ); | 154 | ); |
| 155 | 155 | ||
| 156 | our @MOVE_TYPE = keys %MOVE_TYPE; | 156 | our @MOVE_TYPE = qw(all ship boat swim flying fly_high fly_low walk); |
| 157 | 157 | ||
| 158 | { | 158 | { |
| 159 | package Deliantra::MoveType; | 159 | package Deliantra::MoveType; |
| 160 | 160 | ||
| 161 | use overload | 161 | use overload |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |