Ver Fonte

* fpc: don't search for compiler binary in current directory when paramstr(0)
does not contain a path (unless the current directory is also in the PATH)

git-svn-id: trunk@44395 -

Jonas Maebe há 5 anos atrás
pai
commit
429b3744c4
1 ficheiros alterados com 1 adições e 1 exclusões
  1. 1 1
      compiler/utils/fpc.pp

+ 1 - 1
compiler/utils/fpc.pp

@@ -94,7 +94,7 @@ program fpc;
          ppcbin:=extrapath+ppcbin;
          findexe:=true;
        end
-      else if FileExists(path+ppcbin) then
+      else if (path<>'') and FileExists(path+ppcbin) then
        begin
          ppcbin:=path+ppcbin;
          findexe:=true;