mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 13:50:36 +00:00
Aligns block closings with their opening lines.
This commit is contained in:
parent
a6fe260a5e
commit
3395cd2d33
|
@ -3556,9 +3556,13 @@ FUNCTION ide2 (ignore)
|
|||
retval$ = idergbmixer$(0)
|
||||
ELSEIF IdeAutoComplete AND idefocusline > 0 AND LEN(_TRIM$(a$)) = 0 THEN
|
||||
'close open block
|
||||
tempIndent$ = idegetline(idefocusline)
|
||||
tempIndent$ = SPACE$(LEN(tempIndent$) - LEN(LTRIM$(tempindent$)))
|
||||
IF idefocusline = definingtypeerror THEN
|
||||
idecx = LEN(tempIndent$) + 1
|
||||
insertAtCursor SCase$("End Type"): GOTO specialchar
|
||||
ELSEIF idefocusline = controlref(controllevel) AND INSTR(idecompilererrormessage$, " without ") > 0 THEN
|
||||
idecx = LEN(tempIndent$) + 1
|
||||
SELECT EVERYCASE controltype(controllevel)
|
||||
CASE 1: insertAtCursor SCase$("End If"): GOTO specialchar
|
||||
CASE 2: insertAtCursor SCase$("Next"): GOTO specialchar
|
||||
|
|
Loading…
Reference in a new issue