| … | |
… | |
| 331 | |
331 | |
| 332 | unlink $oxfile unless $DEBUG; |
332 | unlink $oxfile unless $DEBUG; |
| 333 | |
333 | |
| 334 | if ($cfg->{archname}) { |
334 | if ($cfg->{archname}) { |
| 335 | if (@{$cfg->{dir}} > 1) { |
335 | if (@{$cfg->{dir}} > 1) { |
|
|
336 | my $aname = $cfg->{archname}; |
|
|
337 | unless ($aname =~ s/%/$d/g) { |
|
|
338 | $aname .= $d; |
|
|
339 | } |
| 336 | system ("convert ${filebase}_dir_${d}.tga $cfg->{archname}$d.png"); |
340 | system ("convert ${filebase}_dir_${d}.tga $aname.png"); |
| 337 | print "saved arch png to: $cfg->{archname}$d.png\n"; |
341 | print "saved arch png to: $aname.png\n"; |
| 338 | } else { |
342 | } else { |
| 339 | system ("convert ${filebase}_dir_${d}.tga $cfg->{archname}.png"); |
343 | system ("convert ${filebase}_dir_${d}.tga $cfg->{archname}.png"); |
| 340 | print "saved arch png to: $cfg->{archname}.png\n"; |
344 | print "saved arch png to: $cfg->{archname}.png\n"; |
| 341 | } |
345 | } |
| 342 | } else { |
346 | } else { |
