--- a/hedgewars/uCommandHandlers.pas	Tue Dec 02 12:02:20 2014 +0300
+++ b/hedgewars/uCommandHandlers.pas	Tue Dec 02 13:29:06 2014 -0500
@@ -666,7 +666,7 @@
 
 procedure chMapGen(var s: shortstring);
 begin
-cMapGen:= StrToInt(s)
+cMapGen:= TMapGen(StrToInt(s))
 end;
 
 procedure chTemplateFilter(var s: shortstring);