DIRECTORY Rope USING [ROPE], TEditDocument USING [TEditDocumentData]; TEditTouchup: CEDAR DEFINITIONS = BEGIN fullUpdate: REF ANY ; -- use as whatChanged to paint all linked viewers refresh: REF ANY ; -- use as whatChanged refresh viewer after edits PreScrollDownRec: TYPE = RECORD [ lines: INTEGER, -- number of lines that will be added at top of viewer distance: INTEGER -- number of scan lines to move down ]; RefreshOver: PROC; LockAfterRefresh, LockAfterScroll: PROC [tdd: TEditDocument.TEditDocumentData, who: Rope.ROPE] RETURNS [ok: BOOL]; UnlockAfterRefresh: PROC [tdd: TEditDocument.TEditDocumentData]; END. ¦TEditTouchup.mesa Edited by Paxton on October 27, 1982 1:54 pm Use $ShowPSel as whatChanged to get pSel redisplayed. Similarly for $ShowSSel. Locks the tdd. Κ˜Jšœ?™?J˜šΟk ˜ Jšœœœ˜Jšœœ˜(J˜—Jšœœ˜'J˜Jšœ œœΟc1˜GJšœ œœž0˜CJ˜šœœœ˜!Jšœœž6˜FJšœ œž$˜6J˜—J˜Jšœž œ3™OJ™JšΟn œœ˜J˜šœŸœœ2œ˜^Jšœœ˜J™—Icode˜JšŸœœ(˜@Iunit˜Jšœ˜J˜—…—t5