diff -r 159bc2fd7f68 -r 8e1bd8b5780e hedgewars/uLand.pas --- a/hedgewars/uLand.pas Thu Jul 08 23:34:25 2010 +0200 +++ b/hedgewars/uLand.pas Sat Jul 10 02:02:37 2010 +0200 @@ -66,10 +66,11 @@ procedure LogLandDigest; var s: shortstring; - adler: LongInt; + adler, i, tmp: LongInt; begin adler:= 1; -Adler32Update(adler, @Land[0,0], sizeof(Land)); +for i:= 0 to LAND_HEIGHT-1 do + Adler32Update(adler, @Land[i,0], LAND_WIDTH); s:= 'M'+inttostr(adler); CheckLandDigest(s);