فهرست منبع

Fix compilation of dosbox_wrapper.pas

Pierre Muller 1 ماه پیش
والد
کامیت
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;