--- a/hedgewars/uLand.pas	Fri Jan 11 22:56:28 2008 +0000
+++ b/hedgewars/uLand.pas	Fri Jan 11 23:11:53 2008 +0000
@@ -29,7 +29,6 @@
 procedure GenMap;
 function GenPreview: TPreview;
 procedure CheckLandDigest(s: shortstring);
-procedure LogLandDigest;
 
 implementation
 uses uConsole, uStore, uMisc, uConsts, uRandom, uTeams, uLandObjects, uSHA, uIO;
@@ -65,7 +64,7 @@
 if digest = '' then
    digest:= s
 else
-//   TryDo(s = digest, 'Different maps generated, sorry', true)
+   TryDo(s = digest, 'Different maps generated, sorry', true)
 end;
 
 procedure DrawLine(X1, Y1, X2, Y2: LongInt; Color: Longword);