[net.sources] MicroEMACS & Terminals with "SG=..."

res@exunido.UUCP (11/12/86)

MicroEMACS 3.7 and Terminal with "sg="

  This is a patch for the MicroEMACS 3.7. Terminals that need one or
more character spaces for the "standout-switches" wouldn't run with
the std. sources. This patch let your ue work with this terminals if
you compile with "-DBANDO".
This was a "quick" hack, it may work incorrect sometimes. If you can
locate the problem, please report to me.

	Ralf E. Stranzenbach
	University of Dortmund, Western Germany
	[res@unido.uucp]

-----<cut here>----------<cut here>----------<cut here>----------<cut here>-----
---> Thats for "tcap.c"
41d40
< int SG;
43d41
< 
98,100d95
< 
< 	if((SG = tgetnum("sg"))<0)
< 		SG = 0;
-----<cut here>----------<cut here>----------<cut here>----------<cut here>-----
---> Thats for "display.c"
13,15d12
< /* import termcap "sg" entry */
< extern int SG;
< 
646,648d642
< #ifdef BANDO
< 	int revcor;		/* Correction factor for reverse lines */
< #endif
672d665
< 
674,677d666
< #ifdef BANDO
< 		{
< 			revcor = 2*SG;
< #endif
679,683d667
< #ifdef BANDO
< 		}
< 		else
< 			revcor = 0;
< #endif
687,689d670
< #ifdef BANDO
< 		cp3 = &vp1->v_text[term.t_ncol-revcor];
< #else
691d671
< #endif
756,768d735
< #  ifdef BANDO
< 	if((vp1->v_flag & VFREV) == VFREV)
< 	{
< 		/* Terminals with sg!=0 don't need reverse switch */
< 		if(!SG)
< 		{
< 			revcor = 0;
< 			(*term.t_rev)(TRUE);
< 		}
< 		else
< 			revcor = 2*SG;
< 	}
< #  else
770d736
< #endif	
785,787d750
< #ifdef BANDO
< 	if(!SG)
< #endif
820,823d782
< #ifdef BANDO
<     vtmove(n, SG);
<     vscreen[n]->v_flag &= ~VFREV;
< #else
825d783
< #endif
844a803
>     strcpy(tline, " MicroEMACS 3.7 (");		/* Buffer name. */
846,853d804
< #ifdef USG
<     strcpy(tline, " MicroEMACS 3.7 [sys V] (");		/* Buffer name. */
< #else
< #  ifdef OSK
<     strcpy(tline, " MicroEMACS 3.7 [os9] (");		/* Buffer name. */
< #  endif
< #endif
< 
926,930c877
< #ifdef BANDO
<     while (n < (term.t_ncol - 2*SG))
< #else
<     while (n < term.t_ncol)		/* Pad to full width. */
< #endif
---
>     while (n < term.t_ncol)             /* Pad to full width. */
-----<cut here>----------<cut here>----------<cut here>----------<cut here>-----