--- a/hedgewars/hwengine.pas Sat Dec 08 19:30:25 2018 +0100
+++ b/hedgewars/hwengine.pas Thu Dec 13 10:49:30 2018 -0500
@@ -140,14 +140,12 @@
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);
@@ -163,6 +161,7 @@
WriteLnToConsole('Screenshot failed.');
AddChatString(#5 + 'screen capture failed (lack of memory or write permissions)');
end
+ {$ENDIF}
end;
end;