git.shiar.nl
/
perl
/
schtarr.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
XXX: handle multiple MTXM chunks correctly (tileset obfuscation for example in BlitzX...
[perl/schtarr.git]
/
scmap
diff --git
a/scmap
b/scmap
index 2787355bd25d81bd784a4aa8e3bc3492320405a9..f636b25742250bf6d5fd8c921cc9bff38eac451e 100755
(executable)
--- a/
scmap
+++ b/
scmap
@@
-70,7
+70,7
@@
if (defined $mapsep{$SHOWMAP}) {
if ($SHOWMAP eq "ppm") {
use Imager;
if ($SHOWMAP eq "ppm") {
use Imager;
- my $img = Imager->new(xsize => $map->width * 4, ysize => $map->
width
* 4);
+ my $img = Imager->new(xsize => $map->width * 4, ysize => $map->
height
* 4);
use Data::StarCraft::Tileset;
my $era = world($map);
use Data::StarCraft::Tileset;
my $era = world($map);