o5r/plan9port
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

collapse \r\r\r\r => \r.

Browse source
This commit is contained in:
rsc 2004-04-25 21:23:27 +00:00
parent 62780722f5
commit 304b47c101
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/cmd/9term/9term.c
View file

@ -229,7 +229,7 @@ threadmain(int argc, char *argv[])
maxtab = 4; /* be like rio */ maxtab = 4; /* be like rio */
snprint(buf, sizeof buf, "%d", maxtab); snprint(buf, sizeof buf, "%d", maxtab);
putenv("tabstop", maxtab); putenv("tabstop", buf);
initdraw(0, nil, "9term"); initdraw(0, nil, "9term");
notify(hangupnote); notify(hangupnote);
@ -1080,6 +1080,10 @@ runewrite(Rune *r, int n)
} else if(*p == '\r') { /* treat like ^U */ } else if(*p == '\r') { /* treat like ^U */
/* convert CR without NL into erased line */ /* convert CR without NL into erased line */
/* i feel really sleazy about this but it helps */ /* i feel really sleazy about this but it helps */
while(i<n-1 && *(p+1) == '\r'){
i++;
p++;
}
if(i<n-1 && *(p+1) != '\n'){ if(i<n-1 && *(p+1) != '\n'){
while(q > r && *(q-1) != '\n') while(q > r && *(q-1) != '\n')
q--; q--;