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]; RestoreActionArea: PROC [exec: UserExec.ExecHandle]; 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 June 20, 1983 9:16 am Contains procedures shared in common by actionareasimpl, actionareasopsimpl, userexecimpl used in both actionareasimpl and actionareasopsimpl used in both actionareasimpl and actionareasopsimpl used in both actionareasopsimpl and userexecimpl when an action area that was suspended becomes active again. restores menu, caption, etc. ΚJ– "cedar" style˜J˜Jšœ,™,J™YšΟk ˜ Jšœœ˜Jšœœœ˜Jšœ œ˜Jšœœ ˜J˜J˜—J˜šΠblœœ œ˜%J˜—š˜J˜—šΟnœœ˜4J™3—J˜š Ÿœœ$œ œœ˜UJšœ3™3—J™šŸœœ˜5J™Š—J˜JšŸ œœ œ œ0œœœ˜‘J˜JšŸ œ œ'œ˜_J˜JšŸœŸœŸœ˜KJ˜JšœΟc˜J˜J˜J˜—…—ΐŒ