6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2024-12-29 01:30:22 +00:00
Code Issues Projects Releases Wiki Activity

Return to editor when toggling lower-case chip support

Browse Source
This commit is contained in:
Dave Schmenk 2019-12-14 17:58:35 -08:00
parent d3c1b8881a
commit c7f48765b2
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/toolsrc/ed.pla
View File

@ -1495,6 +1495,13 @@ def cmdmode#0
fin fin
findtxt findtxt
return return
is 'T' // Toggle upper/lower case display
if flags & uppercase
txtlower
else
txtupper
fin
return
is 'G' // Goto line # is 'G' // Goto line #
line = strtonum(cmdptr) line = strtonum(cmdptr)
if line if line
@ -1548,13 +1555,6 @@ def cmdmode#0
strstripcpy(@filename, "UNTITLED") strstripcpy(@filename, "UNTITLED")
fin fin
break break
is 'T' // Toggle upper/lower case display
if flags & uppercase
txtlower
else
txtupper
fin
break
otherwise otherwise
bell bell
putc('?') putc('?')