[DEVELOPMENT ENVIRONMENT]

* BUG: Fix a crash in the menu editor when inserting a new item.


git-svn-id: svn://localhost/gambas/trunk@6349 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2014-06-29 20:09:31 +00:00
parent c534102932
commit 56a7b5f946

View file

@ -464,7 +464,7 @@ Private Sub InsertMenu(bAfter As Boolean)
If bAfter Then
If iIndex > 0 Then hCMenu.Level = $aMenu[iIndex - 1].Level
Else
hCMenu.Level = $aMenu[iIndex].Level
If iIndex >= 0 Then hCMenu.Level = $aMenu[iIndex].Level
Endif
$cName[hCMenu.Name] = True