diff --git a/gui/notepad/src/notepad.tal b/gui/notepad/src/notepad.tal index 9dfc660..e878301 100644 --- a/gui/notepad/src/notepad.tal +++ b/gui/notepad/src/notepad.tal @@ -447,7 +447,7 @@ .Screen/y DEI2 #00c8 NEQ2 ?{ ;etc-icn .Screen/addr DEO2 #01 .Screen/sprite DEO - !&end } + POP2 JMP2r } ( | draw char ) DUP2 #0001 SUB2 LDA2 char-addr .Screen/addr DEO2 is-selected STH @@ -464,6 +464,7 @@ &end POP2 JMP2r @ ( -- ) + [ LIT2 00 -collapsed ] LDZ EQU ?{ JMP2r } [ LIT2 26 -Screen/auto ] DEO #0000 .Screen/x DEO2 .Screen/height DEI2 #0020 SUB2 DUP2 .Screen/y DEO2