mirror of
https://git.tartarus.org/simon/putty.git
synced 2025-05-28 15:24:49 -05:00
From RDB: a few extra escape sequences seen in SCO terminals.
[originally from svn r1106]
This commit is contained in:
parent
9f32a1da35
commit
7d86bbfbe2
24
terminal.c
24
terminal.c
@ -1056,8 +1056,16 @@ void term_out(void)
|
|||||||
paste_hold = 0;
|
paste_hold = 0;
|
||||||
logtraffic((unsigned char) c, LGTYP_ASCII);
|
logtraffic((unsigned char) c, LGTYP_ASCII);
|
||||||
break;
|
break;
|
||||||
case '\013':
|
|
||||||
case '\014':
|
case '\014':
|
||||||
|
if (has_compat(SCOANSI)) {
|
||||||
|
move(0, 0, 0);
|
||||||
|
erase_lots(FALSE, FALSE, TRUE);
|
||||||
|
disptop = 0;
|
||||||
|
wrapnext = FALSE;
|
||||||
|
seen_disp_event = 1;
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
case '\013':
|
||||||
compatibility(VT100);
|
compatibility(VT100);
|
||||||
case '\n':
|
case '\n':
|
||||||
if (curs.y == marg_b)
|
if (curs.y == marg_b)
|
||||||
@ -1615,6 +1623,20 @@ void term_out(void)
|
|||||||
deselect();
|
deselect();
|
||||||
}
|
}
|
||||||
break;
|
break;
|
||||||
|
case 'S':
|
||||||
|
compatibility(SCOANSI);
|
||||||
|
scroll(marg_t, marg_b, def(esc_args[0], 1), TRUE);
|
||||||
|
fix_cpos;
|
||||||
|
wrapnext = FALSE;
|
||||||
|
seen_disp_event = TRUE;
|
||||||
|
break;
|
||||||
|
case 'T':
|
||||||
|
compatibility(SCOANSI);
|
||||||
|
scroll(marg_t, marg_b, -def(esc_args[0], 1), TRUE);
|
||||||
|
fix_cpos;
|
||||||
|
wrapnext = FALSE;
|
||||||
|
seen_disp_event = TRUE;
|
||||||
|
break;
|
||||||
case ANSI('|', '*'):
|
case ANSI('|', '*'):
|
||||||
/* VT420 sequence DECSNLS
|
/* VT420 sequence DECSNLS
|
||||||
* Set number of lines on screen
|
* Set number of lines on screen
|
||||||
|
Loading…
x
Reference in New Issue
Block a user