Переглянути джерело

Merged revisions 1738 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/trunk

r1738 (olle)
fixed support for filenames with spaces in exec

git-svn-id: branches/fixes_2_0@1742 -

olle 20 роки тому
батько
коміт
eab3802f2b
1 змінених файлів з 1 додано та 1 видалено
  1. 1 1
      rtl/macos/dos.pp

+ 1 - 1
rtl/macos/dos.pp

@@ -299,7 +299,7 @@ var
 Begin
   {Make ToolServers working directory in sync with our working directory}
   PathArgToFullPath(':', wdpath);
-  wdpath:= 'Directory ' + wdpath;
+  wdpath:= 'Directory ''' + wdpath + '''';
   err:= ExecuteToolserverScript(PChar(wdpath), LastDosExitCode);
     {TODO Only change path when actually needed. But this requires some
      change counter to be incremented each time wd is changed. }