http://gambaswiki.org/bugtracker/edit?object=BUG.746&from=L21haW4-
Comment #2 by Moviga TECHNOLOGIES:
This does not print anything at all:
'Loading custom up profiles
If Exist(CONFIG_FOLDER) Then
Debug "CONFIG_FOLDER exits"
For Each f In Dir(CONFIG_FOLDER, "*.conf", gb.File)
$aProfiles.Add(File.BaseName(f))
Debug "Found the profile: " & File.BaseName(f)
Next
Else
Shell "mkdir -p " & CONFIG_FOLDER
Endif
This works as expected and both instances of Print is printing:
'Loading custom up profiles
If Exist(CONFIG_FOLDER) Then
Print "CONFIG_FOLDER exits"
For Each f In Dir(CONFIG_FOLDER, "*.conf", gb.File)
$aProfiles.Add(File.BaseName(f))
Print "Found the profile: " & File.BaseName(f)
Next
Else
Shell "mkdir -p " & CONFIG_FOLDER
Endif
As you can see, I use Debug other places and there it works. It is just here
that it doesn't for some reason.
------------------------------------------------------------------------------
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
