changelog shortlog tags branches changeset file revisions annotate raw help

Mercurial > hg > plan9front / sys/src/cmd/samterm/main.c

revision 7418: a1b2824f596e
parent 4454: 020d2d83dd6f
     1.1--- a/sys/src/cmd/samterm/main.c
     1.2+++ b/sys/src/cmd/samterm/main.c
     1.3@@ -485,6 +485,7 @@ nontypingkey(int c)
     1.4 	case Ksoh:
     1.5 	case Kenq:
     1.6 	case Kstx:
     1.7+	case Kbel:
     1.8 		return 1;
     1.9 	}
    1.10 	return 0;
    1.11@@ -658,6 +659,22 @@ type(Flayer *l, int res)	/* what a blood
    1.12 		a = t->rasp.nrunes;
    1.13 		flsetselect(l, a, a);
    1.14 		center(l, a);
    1.15+ 	}else if(c == Kbel){
    1.16+ 		int i;
    1.17+ 		if(work == nil)
    1.18+ 			return;
    1.19+ 		if(which != work){
    1.20+ 			current(work);
    1.21+ 			return;
    1.22+ 		}
    1.23+ 		t = (Text*)work->user1;
    1.24+ 		l = &t->l[t->front];
    1.25+ 		for(i=t->front; t->nwin>1 && (i = (i+1)%NL) != t->front; )
    1.26+ 			if(t->l[i].textfn != 0){
    1.27+ 				l = &t->l[i];
    1.28+ 				break;
    1.29+ 			}
    1.30+ 		current(l);
    1.31 	}else{
    1.32 		if(c==Kesc && typeesc>=0){
    1.33 			l->p0 = typeesc;