this was not checking all of Land[]
authornemo
Thu, 01 Apr 2010 16:44:56 +0000
changeset 3239 ac829895edfc
parent 3238 e99a43a2405b
child 3240 e3b52d10b4c2
this was not checking all of Land[]
hedgewars/uLand.pas
--- a/hedgewars/uLand.pas	Thu Apr 01 16:34:20 2010 +0000
+++ b/hedgewars/uLand.pas	Thu Apr 01 16:44:56 2010 +0000
@@ -68,7 +68,7 @@
     s: shortstring;
 begin
 SHA1Init(ctx);
-SHA1UpdateLongwords(ctx, @Land, sizeof(Land) div 4);
+SHA1UpdateLongwords(ctx, @Land, sizeof(Land));
 dig:= SHA1Final(ctx);
 s:='M{'+inttostr(dig[0])+':'
        +inttostr(dig[1])+':'