DIRECTORY Icons USING [IconFlavor], Rope USING [ROPE], UserExec USING [ExecHandle], ViewerClasses USING [Viewer] ; ActionAreasDefs: CEDAR DEFINITIONS = BEGIN RestoreSelection: PROC [exec: UserExec.ExecHandle]; LeaveActionArea: PROC [exec: UserExec.ExecHandle, abort: BOOL, booted: BOOL _ FALSE]; ShowSource: PROC [name: Rope.ROPE, index: INT, exec: UserExec.ExecHandle, onlyIfAlreadyOpen: BOOL _ FALSE] RETURNS[viewer: ViewerClasses.Viewer]; PrintSource: PUBLIC PROC [viewer: ViewerClasses.Viewer, index: INT, exec: UserExec.ExecHandle]; actionAreaIcon, inactiveActionAreaIcon, inactiveExecIcon: Icons.IconFlavor; END. -- ActionAreas θEdited by Teitelman on May 13, 1983 10:43 am Contains procedures shared in common by actionareasimpl, actionareasopsimpl used in both actionareasimpl and actionareasopsimpl used in both actionareasimpl and actionareasopsimpl Κ5– "cedar" style˜J˜Jšœ,™,J™KšΟk ˜ Jšœœ˜Jšœœœ˜Jšœ œ˜Jšœœ ˜J˜J˜—J˜šΠblœœ œ˜%J˜—š˜J˜—šΟnœœ˜4J™3—J˜š Ÿœœ$œ œœ˜UJšœ3™3—J™JšŸ œœ œ œ0œœœ˜‘J˜JšŸ œ œ'œ˜_J˜JšŸœŸœŸœ˜KJ˜JšœΟc˜J˜J˜J˜—…—Š§