Преглед изворни кода

Fix compilation of dosbox_wrapper.pas

Pierre Muller пре 3 месеци
родитељ
комит
870a91502a
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      tests/utils/dosbox/dosbox_wrapper.pas

+ 2 - 2
tests/utils/dosbox/dosbox_wrapper.pas

@@ -5,7 +5,7 @@ uses
 {$ifdef UseSignals}
   signals,
 {$endif def UseSignals}
-  testu, classes,
+  tsutils, tstypes, classes,
   Process;
 
 const
@@ -284,7 +284,7 @@ begin
     end
   else if verbose then
     writeln('Analyzing source file ',SourceFileName);
-  if not GetConfig(SourceFileName,config) then
+  if not GetConfig('',SourceFileName,config) then
     exit;
 
   RelativeToConfigMarker:=TObject.Create;