X-Git-Url: https://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Feditor%2Ff_maptest.pas;h=69f7f40f0568c338ddfee771a442719314fac0e8;hp=470da17acbf478c2ca206869204cc607b0b3a779;hb=3dc2fe6b3d29cd54425db8f590e922f2dce50e99;hpb=212386359ea0af4e0a861f9bf92c45a1516ac87c

diff --git a/src/editor/f_maptest.pas b/src/editor/f_maptest.pas
index 470da17..69f7f40 100644
--- a/src/editor/f_maptest.pas
+++ b/src/editor/f_maptest.pas
@@ -1,6 +1,6 @@
 unit f_maptest;
 
-{$MODE Delphi}
+{$INCLUDE ../shared/a_modes.inc}
 
 interface
 
@@ -70,7 +70,7 @@ var
   n: Integer;
   
 begin
-  config := TConfig.CreateFile(EditorDir+'/Editor.cfg');
+  config := TConfig.CreateFile(EditorDir+'Editor.cfg');
 
   if rbTDM.Checked then
     s := 'TDM'
@@ -114,7 +114,7 @@ begin
   config.WriteStr('TestRun', 'Exe', edD2dExe.Text);
   TestD2dExe := edD2dExe.Text;
 
-  config.SaveFile(EditorDir+'/Editor.cfg');
+  config.SaveFile(EditorDir+'Editor.cfg');
   config.Free();
   Close();
 end;
@@ -153,7 +153,7 @@ var
   config: TConfig;
   
 begin
-  config := TConfig.CreateFile(EditorDir+'/Editor.cfg');
+  config := TConfig.CreateFile(EditorDir+'Editor.cfg');
 
   TestGameMode := config.ReadStr('TestRun', 'GameMode', 'DM');
   TestLimTime := config.ReadStr('TestRun', 'LimTime', '0');