--- a/hedgewars/uLandPainted.pas	Thu Dec 23 21:54:57 2010 +0300
+++ b/hedgewars/uLandPainted.pas	Thu Dec 23 22:01:19 2010 +0300
@@ -148,9 +148,15 @@
     while(pe <> nil) do
         begin
         if (pe^.point.flags and $80 <> 0) then
+            begin
+            AddFileLog('[DRAW] Move to: ('+inttostr(pe^.point.X)+','+inttostr(pe^.point.Y)+')');
             FillRoundInLand(pe^.point.X, pe^.point.Y, 34, lfBasic)
+            end
             else
+            begin
+            AddFileLog('[DRAW] Line to: ('+inttostr(pe^.point.X)+','+inttostr(pe^.point.Y)+')');
             DrawLineOnLand(prevPoint.X, prevPoint.Y, pe^.point.X, pe^.point.Y);
+            end;
 
         prevPoint:= pe^.point;
         pe:= pe^.next;