Additional project references using relative paths are correctly handled now.

[DEVELOPMENT ENVIRONMENT]
* BUG: Additional project references using relative paths are correctly handled now.
This commit is contained in:
gambas 2021-09-14 10:02:07 +02:00
parent 2a751fcd46
commit a33b312136
2 changed files with 3 additions and 0 deletions

View file

@ -187,6 +187,7 @@ Public Sub Load()
If {Library} Then
hLibraryInfo = CLibraryInfo[Path]
hLibraryInfo.GetInfo()
sPath = Temp$()
File.Save(sPath, hLibraryInfo.Info)

View file

@ -72,6 +72,7 @@ Static Public Sub SolvePath(sPath As String, Optional bKeepPath As Boolean) As S
Else
sSolve = sPath
If sSolve Not Ends ".gambas" Then sSolve &= ".gambas"
If File.IsRelative(sSolve) Then sSolve = File.RealPath(Project.Dir &/ sSolve)
Endif
'sSolve = File.SetExt(sSolve, "gambas")
@ -106,6 +107,7 @@ Public Sub _new(sPath As String)
Path = sPath
If Not sPath Or If Not Exist(sPath) Then
Error "gambas3: warning: library not found: "; Name
NotFound = True
Return
Endif