DIRECTORY TEditSelection USING [pSel], TEditDocument USING [SelectionId], TextNode USING [Location], ViewerClasses USING [ScrollProc, Viewer]; TEditScrolling: CEDAR DEFINITIONS IMPORTS TEditSelection = BEGIN OPEN ViewerClasses; ScrollTEditDocument: ScrollProc ; ScrollToPosition: PROC [viewer: Viewer, pos: TextNode.Location, offset: BOOLEAN _ TRUE] ; AutoScroll: PROC [ viewer: Viewer _ TEditSelection.pSel.viewer, tryToGlitch: BOOLEAN _ TRUE, toEndOfDoc: BOOLEAN _ FALSE, id: TEditDocument.SelectionId _ primary] ; END. L-- TEditScrolling.mesa; Edited by Paxton on December 28, 1982 2:11 pm ÊܘJšÏcE™EJ˜šÏk ˜ Jšœžœ˜Jšœžœ˜"Jšœ žœ ˜Jšœžœ˜)J˜—Jš œžœžœžœžœ˜TJ˜J˜!J˜JšÏnœžœ2žœžœ˜YJ˜šŸ œžœ˜Jšœ,˜,Jšœ žœžœ˜Jšœ žœž˜Jšœ*˜*—J˜Jšžœ˜J˜—…—: