Save space
This commit is contained in:
parent
e08f3c306d
commit
9e20f329e4
1 changed files with 1 additions and 3 deletions
|
|
@ -142,12 +142,10 @@ do
|
|||
showcommands=not showcommands
|
||||
case chr$(26) ' Ctrl+Z
|
||||
if ubound(commands) > 3 then
|
||||
' Drop the trailing empty slot AND the last valid command
|
||||
' Drop the trailing empty slot and the last valid command
|
||||
redim _preserve commands(ubound(commands) - 2) as string
|
||||
|
||||
' Re-create the empty trailing slot required by addcommand
|
||||
redim _preserve commands(ubound(commands) + 1) as string
|
||||
|
||||
redraw
|
||||
end if
|
||||
end select
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue