mirror of
https://github.com/bobbimanners/emailler.git
synced 2024-11-18 21:07:03 +00:00
vt100 emulation was leaving a cursor after a "clear to end of line" command ( ]J ) - most visible when pressing up arrow in bash to get to previous item in command history
git-svn-id: http://svn.code.sf.net/p/netboot65/code@236 93682198-c243-4bdb-bd91-e943c89aac3b
This commit is contained in:
parent
488c28d671
commit
902e4e5e6e
@ -43,6 +43,7 @@
|
||||
.import dns_set_hostname
|
||||
|
||||
.import get_key_ip65
|
||||
.import get_key
|
||||
.import cfg_mac
|
||||
.import dhcp_init
|
||||
|
||||
@ -196,9 +197,6 @@ wait_for_keypress:
|
||||
beq @loop
|
||||
rts
|
||||
|
||||
get_key:
|
||||
jmp get_key_ip65
|
||||
|
||||
cfg_get_configuration_ptr:
|
||||
ldax #cfg_mac
|
||||
rts
|
||||
|
@ -1368,6 +1368,7 @@ erase_line_by_vector:
|
||||
; -------------------------------------
|
||||
|
||||
erase_to_end_of_line:
|
||||
jsr cursor_off
|
||||
; erase chars
|
||||
ldy $d3 ; get crsr col
|
||||
lda #$20 ; load space
|
||||
@ -1386,6 +1387,7 @@ erase_to_end_of_line:
|
||||
iny
|
||||
cpy #$28 ; pos 40?
|
||||
bne :- ; next char
|
||||
jsr cursor_on
|
||||
rts
|
||||
|
||||
; -------------------------------------
|
||||
|
Loading…
Reference in New Issue
Block a user