YourNameHere.profile
Copyright © 1984, 1985, 1986 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) April 30, 1985 6:34:22 pm PDT
Your Name Here August 13, 1986 4:25:31 pm PDT
Peter Kessler September 2, 1986 11:41:50 am PDT
Pier, June 2, 1986 7:18:42 pm PDT
Spreitzer, June 19, 1986 12:30:22 pm PDT
Mike Spreitzer June 29, 1986 5:10:50 pm PDT
Commands for moving this file around:
Copy -u /// ← ///Users/YourNameHere.pa/YourNameHere.Profile
-- to the root directory of the local machine from your home directory.
Copy -u ///Users/YourNameHere.pa/ ← ///YourNameHere.Profile
-- to your home directory from the root directory of the local machine.
Copy -u /User/YourNameHere/6.1/ ← ///Users/YourNameHere.pa/YourNameHere.Profile
-- to your 6.1 directory on the User file server from your home directory.
VersionMap options
VersionMap.SourceMaps: /Cedar/Cedar6.1/VersionMap/CedarSource.VersionMap /Cedar/CedarChest6.1/VersionMap/CedarChestSource.VersionMap
VersionMap.SymbolsMaps: /Cedar/Cedar6.1/VersionMap/CedarSymbols.VersionMap /Cedar/CedarChest6.1/VersionMap/CedarChestSymbols.VersionMap
CommandTool options
CommandTool.BootCommands: "
... is executed in the very first CommandTool instance that is created after a full boot. The intention is to setup the machine to be ready to take a checkpoint.
This entry can also be executed by the ///Commands/NoteBootCommands command.
Bring over and run the basic things:
Push ///Commands
BringOver -p /Cedar/Cedar6.1/Top/BootTool
Run BootTool
Pop
Resize Watch Tool and open it at the top:
← IF (&watchViewer ← ViewerOps.FindViewer[\"Watch\"]) # NIL THEN Watch.ForceSample[parent: NIL, mouseButton: yellow] ELSE MessageWindow.Append[message: \"No Watch Icon\", clearFirst: TRUE]
← IF &watchViewer # NIL THEN ViewerOps.OpenIcon[icon: ViewerOps.FindViewer[\"Watch\"], bottom: FALSE] ELSE MessageWindow.Append[message: \"No Watch Icon\", clearFirst: TRUE]
Bring over the things from CedarChest:
Push ///Commands; Bringover -p [Cedar]<CedarChest6.1>Top>Environment.DF; Pop
-- do this on demand via an alias (below), or copy the above to a CommandTool.
Push ///Commands/
Start the compute server, if this is a Dorado
CommandToolProcedures
SummonerCSLNiceGuy
PseudoServerPrint
← IF SystemVersion.machineType = dorado THEN &cmd[\"SummonerEnableAutoIdle\"] ELSE MessageWindow.Append[message: \"No SummonerEnableAutoIdle\", clearFirst: TRUE]
Start the STP server:
STPServer start
This makes the machine a file server. Make sure the access control files are reasonable. See STPServerDoc.Tioga. A good STPServer.readAccess is "CSL^.pa, CedarUsers^.pa, EDL^.pa".
This file contains a variety of characters. The idea is to get them into your font cache. Scroll through the file to make sure they all get displayed.
Openr FontCache.Tioga
Pop
"
CommandTool.NewUser: "
... is executed in exactly one existing CommandTool instance whenever a new user logs in, either while booting from a checkpoint, or when coming out of idle. The intention is to use this entry to acquire files peculiar to the user.
This entry can also be executed by the ///Commands/NoteNewUser command.
Statistics off
← IF SystemVersion.machineType = dandelion THEN ViewerOps.PaintEverything[] ELSE NIL
Cd
Fix the watch tool again, in case someone broke it:
← IF (&watchViewer ← ViewerOps.FindViewer[\"Watch\"]) # NIL THEN Watch.ForceSample[parent: NIL, mouseButton: yellow] ELSE MessageWindow.Append[message: \"No Watch Icon\", clearFirst: TRUE]
← IF &watchViewer # NIL THEN ViewerOps.OpenIcon[icon: ViewerOps.FindViewer[\"Watch\"], bottom: FALSE] ELSE MessageWindow.Append[message: \"No Watch Icon\", clearFirst: TRUE]
BringOver /User/YourNameHere/6.1/YourNameHere.DF
bring over this user's files.
Start things from Cedar:
Push ///Commands
DoTiogaOps SaveSelectionA MatchCase MatchLiterally LeaveInitCap SubstituteInEntireDoc MatchAnywhere EqualLooksTest DoReplace TypeName \"code\" StyleName \"Cedar\" ReadProfile RestoreSelectionA
← IF (&editToolViewer ← ViewerOps.FindViewer[\"EditTool\"]) # NIL THEN ViewerOps.SetOpenHeight[viewer: &editToolViewer, clientHeight: 228 - (ViewerSpecs.captionHeight + ViewerSpecs.menuHeight + ViewerSpecs.menuBarHeight)] ELSE MessageWindow.Append[message: \"No EditTool Icon\", clearFirst: TRUE]
Changes some settings in the Edit Tool to more commonly useful values.
Pop
Start things from CedarChest:
Push ///Commands
Install CommandToolProcedures
allow idle machine to be compute server:
SummonerCSLNiceGuy
← IF SystemVersion.machineType = dorado THEN &cmd[\"SummonerEnableAutoIdle\"] ELSE MessageWindow.Append[message: \"No SummonerEnableAutoIdle\", clearFirst: TRUE]
allow machine to be compute server client:
SummonerClientOn
Clock
FastMouse on
Run EditorComforts
Install Remember
if you don't install Remember, you should ``Run GmtDebug''
Install GetDWIM
Install WorkingDirectory
STPServer on
Pop
Set up aliases:
Push Commands
Alias bocc Push ///Commands; BringOver -p /Cedar/CedarChest6.1/Top/Environment.df; Pop
Alias Iago boot -l
Pop
Almost ready to run:
DoRollbackStuff
"
CommandTool.PerLogin: "
... is executed in every existing CommandTool instance whenever there is a new user at (1) credentials change, (2) rollback, or (3) return from idle. The intention is to use this entry to customize the command tool instance.
This entry can also be executed by the ///Commands/NotePerLogin command.
SetSearchRules ///Users/YourNameHere.pa/Commands/ ///Commands/
Statistics off
Cd
Set up Buttons:
ClearMenu
CreateButton Open Open $FileNameSelection$
CreateButton SetBreak SetBreak $SelectedViewerName$ $ViewerPosition$
ExecHacks
"
CommandTool.PerCommandTool: "
... is executed for every new CommandTool instance (except for the first one, created at full boot). In most cases, the same customization as NotePerLogin is desired.
This entry can also be executed by the ///Commands/NotePerCommandTool command.
For compatibility, this entry is treated the same as "EachCommandToolCommands".
NotePerLogin
"
Debugger.CommandTool.BootCommands: "
Cd
Push ///Commands/
BringOver -p /Cedar/Cedar6.1/Top/BootTool
Run BootTool
Pop
"
Compiler options
Compiler.SeparateLogs: TRUE
Compiler.ViewSeparateLogs: TRUE
DFTool Options
DFTool.DFNamePrefixes: /Cedar/Cedar6.1/Top/ /Cedar/CedarChest6.1/Top/ /User/YourNameHere/ ./
EditorComforts options
EditorComforts.LastEdited: "Your Name Here"
Icon Registry
RegisteredIcons: "
Remember.defaultIcon: ///Commands/Remember.icons 11 -- a calendar
Phone: ///Commands/Remember.Icons 0 -- pushbutton handset
Conversation: ///Commands/Remember.Icons 1 -- two people talking over a desk
Meeting: ///Commands/Remember.Icons 3 -- one person talking to a group of several
Envelope: ///Commands/Remember.Icons 4 -- an envelope
SoftBall: ///Commands/Remember.icons 6
Lunch: ///Commands/Remember.icons 7
Cookies: ///Commands/Remember.icons 13
"
Miscellaneous options
Tioga.ExtensionStyles: style Style
Tioga.SourceFileExtensions: df mesa tioga cm config style load
Clock.showDateIconic: TRUE
Viewers.SuppressIconPrefix: "[]<>Users>YourNameHere.pa"
Remember options
Remember.EventFile: "///Users/YourNameHere.pa/Remember.EventFile"
Remember.KeyWords: "
Meeting: Leadtime: 15, IconFlavor: Meeting, IconLabelType: Prev
Attend: Leadtime: 15, IconFlavor: Meeting, IconLabelType: Next
Forum: Leadtime: 15, IconFlavor: Meeting, IconLabel: Forum, Time: \"Thursday, 3:45pm\"
Dealer: Leadtime: 15, IconFlavor: Meeting, IconLabel: Dealer, Time: \"Wednesday, 1:15pm\"
Call:  Leadtime: 0, IconFlavor: Phone, IconLabelType: Next
Phone: Leadtime: 0, IconFlavor: Phone, IconLabelType: Next
See:   IconFlavor: Conversation, IconLabelType: next
Write:   IconFlavor: Envelope, IconLabelType: next
BASS:   IconFlavor: Meeting, LeadTime: 1440
"
Summoner options
Summoner.CachePrefixesOKToRead: "[Cedar]<Cedar6.1>" "[Cedar]<CedarChest6.1>"
Summoner.OKToUseLocalDisk: TRUE
TSetter options
Hardcopy.PrintedBy: "Your Name Here"
Hardcopy.PressPrinter: Clover
Hardcopy.TemporaryPressFiles: TRUE
Walnut options
Walnut.WalnutRootFile: "[Ebbetts.Alpine]<YourNameHere.pa>Walnut.Root"
Walnut.InitialActiveOpen: TRUE
Walnut.AutoNewMail: TRUE
Walnut.DisplayMsgSetInIcon: TRUE
WalnutSend.ReplyToSelf: TRUE
Peanut options
Peanut.WorkingDirectory: ///Users/YourNameHere.pa/
The working directory where your mail files live. You probably always want to specify this entry.
Peanut.CarbonCopyToSelf: TRUE
If TRUE, fills in "cc:" field with your own name.
Peanut.KillViewersOnSaveAll: FALSE
If TRUE, SaveAll destroys viewers after they are saved.
Peanut.AutomaticNewMail: FALSE
Will cause peanut to fetch new mail willy-nilly.
Peanut.ActiveMailFile: Active
The name of the mail file for incoming mail.