| … | … | ||
|---|---|---|---|
| 24 | use Carp (); | 24 | use Carp (); |
| 25 | use List::Util (); | 25 | use List::Util (); |
| 26 | 26 | ||
| 27 | our $VERSION = '0.02'; | 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 |