Code editor: Opening the procedure list now should make the current procedure...

Code editor: Opening the procedure list now should make the current procedure name visible reliably.

[DEVELOPMENT ENVIRONMENT]
* BUG: Code editor: Opening the procedure list now should make the current procedure name visible reliably.

app/src/gambas3/.src/Editor/Code/FProcedureList.class

@@ -42,7 +42,7 @@ Public Sub Init(hModule As FEditor, sClass As String, aProc As String[], iCurren
   
   Me.Resize(W, Min(H, $aProc.Count * gvwProc.Rows.H + panFilter.H + 3))
 
-  Try gvwProc[$iCurrent, 0].EnsureVisible
+  Try gvwProc[$iInit, 0].EnsureVisible
   
   $sFind = ""
   $fTimerFind = Timer