# HG changeset patch # User koda # Date 1293484970 -3600 # Node ID 3d808af10ea07c9ecffe1c7b749d9600ed8d01dd # Parent 29ab0d49c3e6e72a7633d0bd316ae533db15c65d AddFileLogs diff -r 29ab0d49c3e6 -r 3d808af10ea0 hedgewars/uLandPainted.pas --- a/hedgewars/uLandPainted.pas Mon Dec 27 12:51:08 2010 -0500 +++ b/hedgewars/uLandPainted.pas Mon Dec 27 22:22:50 2010 +0100 @@ -149,12 +149,12 @@ begin if (pe^.point.flags and $80 <> 0) then begin - AddFileLog('[DRAW] Move to: ('+inttostr(pe^.point.X)+','+inttostr(pe^.point.Y)+')'); + {$IFDEF DEBUGBFILE}AddFileLog('[DRAW] Move to: ('+inttostr(pe^.point.X)+','+inttostr(pe^.point.Y)+')');{$ENDIF} FillRoundInLand(pe^.point.X, pe^.point.Y, 34, lfBasic) end else begin - AddFileLog('[DRAW] Line to: ('+inttostr(pe^.point.X)+','+inttostr(pe^.point.Y)+')'); + {$IFDEF DEBUGFILE}AddFileLog('[DRAW] Line to: ('+inttostr(pe^.point.X)+','+inttostr(pe^.point.Y)+')');{$ENDIF} DrawLineOnLand(prevPoint.X, prevPoint.Y, pe^.point.X, pe^.point.Y); end;