pleeeeeeeeeeeeeeeeeeeeeease, remeber {$IFDEF DEBUGFILE} before using AddFileLog
authorkoda
Tue, 01 Feb 2011 00:27:47 +0100
changeset 4895 481dfbe69cd2
parent 4894 efcea232bbf6
child 4896 972d418057a7
pleeeeeeeeeeeeeeeeeeeeeease, remeber {$IFDEF DEBUGFILE} before using AddFileLog
hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Tue Feb 01 00:18:25 2011 +0100
+++ b/hedgewars/uGears.pas	Tue Feb 01 00:27:47 2011 +0100
@@ -1046,7 +1046,9 @@
         end;
     end else if Gear^.Kind <> gtStructure then // not gtHedgehog nor gtStructure
         begin
+        {$IFDEF DEBUGFILE}
         AddFileLog('Assigning hedgehog ' + inttostr(LongInt(AttackerHog)) + ' to gear ' + inttostr(Gear^.uid));
+        {$ENDIF}
         Gear^.Hedgehog:= AttackerHog;
         end;
     inc(Gear^.Damage, Damage);