luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Do not crash if the layout user directory does not exist yet.

Browse source 
[DEVELOPMENT ENVIRONMENT]
* BUG: Do not crash if the layout user directory does not exist yet.
This commit is contained in:
gambas 2020-01-24 10:27:35 +01:00
parent 902fd4aae2
commit b7a7393b1a
1 changed files with 8 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
app/src/gambas3/.src/Options/FOption.class
View file

@ -1661,12 +1661,14 @@ Private Sub RefreshLayout()
$aLayout.Add(Html(sName)) $aLayout.Add(Html(sName))
Next Next
For Each sFile In Dir(sDir, "*.layout").Sort(gb.Natural) If IsDir(sDir) Then
sName = File.BaseName(sFile) For Each sFile In Dir(sDir, "*.layout").Sort(gb.Natural)
$aLayout.Add(sName) sName = File.BaseName(sFile)
If $cLayoutName.Exist(sName) Then sName = $cLayoutName[sName] $aLayout.Add(sName)
$aLayout.Add(Html(sName)) If $cLayoutName.Exist(sName) Then sName = $cLayoutName[sName]
Next $aLayout.Add(Html(sName))
Next
Endif
gvwLayout.Rows.Count = $aLayout.Count \ 2 gvwLayout.Rows.Count = $aLayout.Count \ 2