# HG changeset patch # User nemo # Date 1544716995 18000 # Node ID e8723f97324c09409c2b9bd35e0e2573b2918abd # Parent 1ffa8bfc5c58a8aecfe315076f2075d6f3e4ea14 Backed out changeset 1ffa8bfc5c58 diff -r 1ffa8bfc5c58 -r e8723f97324c hedgewars/hwengine.pas --- a/hedgewars/hwengine.pas Thu Dec 13 10:49:30 2018 -0500 +++ b/hedgewars/hwengine.pas Thu Dec 13 11:03:15 2018 -0500 @@ -140,12 +140,14 @@ if flagMakeCapture then begin flagMakeCapture:= false; - {$IFNDEF PAS2C} if flagDumpLand then s:= '/Screenshots/mapdump_' else s:= '/Screenshots/hw_'; + {$IFDEF PAS2C} s:= s + inttostr(GameTicks); + {$ELSE} s:= s + FormatDateTime('YYYY-MM-DD_HH-mm-ss', Now()) + inttostr(GameTicks); + {$ENDIF} // flash playSound(sndShutter); @@ -161,7 +163,6 @@ WriteLnToConsole('Screenshot failed.'); AddChatString(#5 + 'screen capture failed (lack of memory or write permissions)'); end - {$ENDIF} end; end;