<> <> <> <> DIRECTORY CommandTool, <> Rope, TerminalIO, UserProfile, ViewerClasses, ViewerOps; CDStarter: CEDAR PROGRAM IMPORTS CommandTool, Rope, TerminalIO, UserProfile, ViewerOps = --, Process = BEGIN StartPrograms: PROC[] = BEGIN runList: LIST OF Rope.ROPE = UserProfile.ListOfTokens[key: "ChipNDale.RunPrograms"]; FOR l: LIST OF Rope.ROPE _ runList, l.rest WHILE l#NIL DO IF NOT Rope.IsEmpty[l.first] THEN { msg: Rope.ROPE = CommandTool.Run[bcdName: l.first].errMsg; IF msg#NIL THEN TerminalIO.WriteRope[msg]; } ENDLOOP; END; <> <> <> <> <<[] _ CommandTool.Run[bcdName: trojanHorse];>> <> <<>> MoveTerminal: PROC[] = BEGIN v: ViewerClasses.Viewer _ ViewerOps.FindViewer["Terminal"]; IF v#NIL THEN ViewerOps.ChangeColumn[v, right]; END; StartPrograms[]; IF UserProfile.Boolean["ChipNDale.TerminalStartRight", TRUE] THEN MoveTerminal[]; <> END.