… | … | ||
---|---|---|---|
22 | use common::sense; | 22 | use common::sense; |
23 | 23 | ||
24 | use Carp (); | 24 | use Carp (); |
25 | use List::Util (); | 25 | use List::Util (); |
26 | 26 | ||
27 | our $VERSION = '0.01'; | 27 | our $VERSION = '0.02'; |
28 | 28 | ||
29 | =item $level = new Games::Sokoban [format => "text|binpack"], [data => "###..."] | 29 | =item $level = new Games::Sokoban [format => "text|rle|binpack"], [data => "###..."] |
30 | 30 | ||
31 | =cut | 31 | =cut |
32 | 32 | ||
33 | sub new { | 33 | sub new { |
34 | my ($class, %arg) = @_; | 34 | my ($class, %arg) = @_; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |