From: Shiar <shiar@shiar.org>
Date: Mon, 12 Nov 2007 15:15:17 +0000 (+0100)
Subject: screp: do not include trailing nulls in map name
X-Git-Url: http://git.shiar.nl/perl/schtarr.git/commitdiff_plain/be195d9afe05fc615f9c0aeb77837adfee4b434f

screp: do not include trailing nulls in map name
---

diff --git a/screp b/screp
index 5b69016..7bf178f 100755
--- a/screp
+++ b/screp
@@ -429,7 +429,7 @@ sub unpackhash {
 }
 
 local $_ = Data::StarCraft::Replay::_read(undef, \*STDIN, 633)
-	and my ($head, @headdata) = unpackhash("CVa3Va12Z28v2Z16Z24Ca26a38a*", $_, qw(
+	and my ($head, @headdata) = unpackhash("CVa3Va12Z28v2Z16Z24CZ26a38a*", $_, qw(
 		engine frames mag1 time mag2 name width height
 		unknown1 creator unknown2 map unknown3
 	))