[comp.os.minix] ed - source for an extra command 'z='

aob@ausmelb.oz.au (Andrew Bulka) (09/18/87)

Here is an extra command 'z=' for the editor ed.  It is found in ex.

To display ten lines before and after your current line
add the following case to the 'z' switch statement of 'docmd.c'.  
The new command 'z=' has certain advantages over 'z.'
in that the current line is preserved.

I find it so useful that arguably, on a fast enough screen, the 
implicit 'p' after each command should be an implicit 'z='.  Switchable
option via set perhaps?

case '=':
	{
	int savecurr = curln;

	if(deflt(curln,curln) < 0)
		return(ERR);

	if(doprnt(curln-10,curln-1) < 0)
	    {
	    curln = savecurr;
	    return(ERR);
	    }

	prntln("---------------------------------------",0,0);

	curln = savecurr;
	if(doprnt(curln,curln) < 0)
	    {
	    curln = savecurr;
	    return(ERR);
	    }

	prntln("---------------------------------------",0,0);

	curln = savecurr;
	if(doprnt(curln+1,curln+9) < 0)
	    {
	    curln = savecurr;
	    return(ERR);
	    }

	curln = savecurr;
	break;
	}

-- 
Andy Bulka,		   ----=----  ACSnet: aob@ausmelb.oz
Austec International Ltd,  ---===---  UUCP: ...!munnari!ausmelb.oz!aob	
344 St Kilda Rd,	   --== ==--  ARPA: aob%ausmelb.oz.au
Melbourne 3004 AUSTRALIA   -=== ===-  Phone: +61 3 699 4511	
D