0ct0pu5/wesnoth
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed bad handling of binary files in the perl campaigns client

Browse source
This commit is contained in:
Dave White 2005-09-11 18:58:22 +00:00
parent 7818e33e42
commit a80f4c199f
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
utils/campaigns_client.pl
View file

@ -132,7 +132,7 @@ sub unarchive_dir
while(@chars) {
my $char = shift @chars;
if(1 == ord $char) {
$char = shift @chars;
$char = chr(ord(shift @chars) - 1);
}
print FILE $char;