Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83 (MC840302); site ttds.UUCP
Path: utzoo!linus!philabs!mcvax!enea!ttds!johanw
From: johanw@ttds.UUCP (Johan Wide'n)
Newsgroups: net.bugs
Subject: the Rand editor (e17), fix for vt100-type scrolling
Message-ID: <67@ttds.UUCP>
Date: Fri, 29-Jun-84 17:55:43 EDT
Article-I.D.: ttds.67
Posted: Fri Jun 29 17:55:43 1984
Date-Received: Tue, 3-Jul-84 03:42:44 EDT
Organization: The Royal Inst. of Techn., Stockholm
Lines: 48

Here is a bugfix for version 17 of the Rand editor (e17).

Index: e/e/term/tcap.c

Description: vt100-type scrolling of part of the screen is incorrectly
handled by tcap.c. The routine implementing the scrolling first sets
a scroll region. It then scrolls the screen (up or down). When it is finished
it should set the scroll region to the entire screen, this is not done.

Fix:
	*** tcap.cOld   Tue Jun 19 20:54:48 1984
	--- tcap.c      Wed Jun 27 13:54:24 1984
	***************
	*** 51,56
	  cle_tcap () { tputs(CE, 1, pch); return 1; }
	  vsc_tcap (top, bottom, num)
	  {
	      tputs(tgoto (CS, bottom, top), 1, pch);
	      if (num > 0) {
		tputs(tgoto (CM, 0, top), 1, pch);

	--- 51,58 -----
	  cle_tcap () { tputs(CE, 1, pch); return 1; }
	  vsc_tcap (top, bottom, num)
	  {
	+     extern S_term t_tcap;
	+
	      tputs(tgoto (CS, bottom, top), 1, pch);
	      if (num > 0) {
		tputs(tgoto (CM, 0, top), 1, pch);
	***************
	*** 63,68
		    tputs(DO, 1, pch);
		} while (++num);
	      }
	      return NO;      /* i.e. can't be sure where the cursor is */
	  }


	--- 65,71 -----
		    tputs(DO, 1, pch);
		} while (++num);
	      }
	+     tputs(tgoto (CS, t_tcap.tt_height - 1, 0), 1, pch);
	      return NO;      /* i.e. can't be sure where the cursor is */
	  }

{decvax,philabs}!mcvax!enea!ttds!johanw         Johan Widen