[unix-pc.sources] Another CKermit patch...

darren@bacchus.UUCP (Darren Friedlein) (01/20/88)

Here's ONE MORE little patch to CKermit.  This one makes the <BREAK> key
work right (^\B is rather awkward).  As usual, cul below the line, move
into your source directory for kermit and apply the diffs with:
    patch <filename
where filename is whatever you call the file containing everything below
the line.

Hope someone else gets some use out of this!

-Darren

/******                      /*****       {mcnc}            Darren G. Friedlein
 *     *      /******        *            {icus}  Rt 4 Box 416, Durham NC 27703
 *     *      *              *            {ethos}    data(bacchus):919/596-7746
 *     *urham \*****\        *     ompany {gladys}           voice:919/596-9492
\******             *oftware \*****       {bakerst}!bacchus!darren
              ******/
"I broke a mirror in hy house - I'm supposed to get seven years bad luck but
my lawyer thinks he can get me five."            -Steven Wright

----- Cut Here -----
*** new/ckucon.c	Wed Jan 13 23:32:10 1988
--- newer/ckucon.c	Fri Jan 15 17:23:55 1988
***************
*** 148,154
  		if ((c & 0177) == escape) { /* Look for escape char */
  		    c = coninc(0) & 0177;   /* Got esc, get its arg */
  		    doesc(c);		    /* And process it */
! 		} else {		/* Ordinary character */
  		    if (ttoc(dopar(c)) > -1) {
  		    	if (duplex) {	    /* Half duplex? */
  			    conoc(c);	    /* Yes, also echo it. */

--- 148,156 -----
  		if ((c & 0177) == escape) { /* Look for escape char */
  		    c = coninc(0) & 0177;   /* Got esc, get its arg */
  		    doesc(c);		    /* And process it */
! 		} else if ((c & 0177) == 127)   /* Look for break key */
! 		    ttsndb();
! 		else {		/* Ordinary character */
  		    if (ttoc(dopar(c)) > -1) {
  		    	if (duplex) {	    /* Half duplex? */
  			    conoc(c);	    /* Yes, also echo it. */