--- a/hedgewars/uLand.pas	Fri Jan 11 21:45:24 2008 +0000
+++ b/hedgewars/uLand.pas	Fri Jan 11 22:47:54 2008 +0000
@@ -29,6 +29,7 @@
 procedure GenMap;
 function GenPreview: TPreview;
 procedure CheckLandDigest(s: shortstring);
+procedure LogLandDigest;
 
 implementation
 uses uConsole, uStore, uMisc, uConsts, uRandom, uTeams, uLandObjects, uSHA, uIO;
@@ -51,7 +52,7 @@
        +inttostr(dig[2])+':'
        +inttostr(dig[3])+':'
        +inttostr(dig[4])+'}';
-CheckLandDigest(s);
+//CheckLandDigest(s);
 SendIPCRaw(@s[0], Length(s) + 1)
 end;