(FILECREATED " 9-Dec-86 00:25:44" ("compiled on " {QV}1.3K>LIBRARY>NCCOLLABORATORCARD.;13) "12-Nov-85 14:59:23" recompiled changes: NCCollab.MakeParamsPropList NCCollab.InitialsSelectionFn NCCollab.FontSelectionFn NCCollab.ExtraTEditPropsSelectionFn NCCollab.FontParamInstallFn NCCollab.CollaboratorCardMakeFn in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED " 9-Dec-86 00:25:36" {QV}1.3K>LIBRARY>NCCOLLABORATORCARD.;13 8562 changes to: (FNS NCCollab.CollaboratorCardMakeFn NCCollab.MakeParamsPropList NCCollab.FontSelectionFn NCCollab.FontParamInstallFn NCCollab.ExtraTEditPropsSelectionFn NCCollab.InitialsSelectionFn) (FILES NCCOLLABORATION) (VARS NCCOLLABORATORCARDCOMS) previous date: "21-Nov-86 20:46:27" {QV}1.3K>LIBRARY>NCCOLLABORATORCARD.;7) NCCollab.MakeParamsPropList D1 (P 2 NoteFile P 0 \NF I 1 StartingParamsPropList I 0 Card) ‹@ÉHd`ð®´@H Y¿IgAg'µghgghgAg'd³Jg µ` ggghgAg'µJg hgghh(165Q NCP.NoteFileProp 126Q NCCollab.FontFetchFn 116Q NCP.NoteFileProp 32Q NC.NoteFileFromNoteFileUID) (174Q NCCollab.ParamInstallFn 171Q NCCollab.ExtraTEditPropsSelectionFn 162Q ExtraTEditProps 153Q ExtraTEditProps 147Q ExtraTEditProps 137Q NCCollab.FontParamInstallFn 134Q NCCollab.FontSelectionFn 131Q NCCollab.FontFetchFn 123Q NC.DefaultFont 113Q Font 103Q Font 77Q Font 67Q NCCollab.ParamInstallFn 64Q NCCollab.InitialsSelectionFn 60Q ? 52Q Initials 46Q Initials 26Q CardObject 16Q NoteFileTYPE# 3 CardObject) () NCCollab.InitialsSelectionFn D1 (P 0 NewValue I 2 Card I 1 Value I 0 Parameter) #ohAiB hdi B •@HB H(37Q NCCollab.ParamInstallFn 30Q NCCollab.CurrentCollaboratorCardP 21Q NCP.AskUser 12Q NC.FetchWindow) NIL ( 3 "New initials: ") NCCollab.FontSelectionFn D1 (P 0 NewValue I 2 Card I 1 Value I 0 Parameter) !A H²B –@HB ¿@H g(32Q NCCollab.FontFetchFn 24Q NCCollab.FontParamInstallFn 15Q NCCollab.CurrentCollaboratorCardP 3 NC.GetFontFromUser) (36Q NOTCHANGED) () NCCollab.ExtraTEditPropsSelectionFnA0001A0002 D1 (NAME ERRORSET F 0 Value) ohdohdPi h(21Q TTYIN) NIL ( 11Q (LISPXREAD) 3 ">> ") NCCollab.ExtraTEditPropsSelectionFnA0001 D1 (NAME ERRORSET F 0 MACROY) o ci(6 NCCollab.ExtraTEditPropsSelectionFnA0001A0002) NIL ( 3 (NCCollab.ExtraTEditPropsSelectionFnA0001A0002)) NCCollab.ExtraTEditPropsSelectionFn D1 (P 5 RESETSTATE P 4 MACROY P 2 OLDVALUE P 1 NewValue P 0 TTYINWindow I 2 Card I 1 Value I 0 Parameter F 6 RESETVARSLST) ¥```` o H ol ol ol H H 1gJhhVc »og £g½Kc ¿gK ¿M“€LYH I ´B •@IB Iio ` A(241Q FLASHW 233Q NC.PrintMsg 221Q NCCollab.ParamInstallFn 212Q NCCollab.CurrentCollaboratorCardP 204Q NC.UserSpecifiedTEditPropsCheckFn 200Q CLOSEW 170Q ERROR! 162Q APPLY 136Q NCCollab.ExtraTEditPropsSelectionFnA0001 103Q TTYDISPLAYSTREAM 77Q PRIN1 73Q CONCAT 67Q CHARACTER 56Q CHARACTER 45Q CHARACTER 34Q NC.MoveWindowOntoScreen 25Q CREATEW 16Q CREATEREGION) (236Q PROMPTWINDOW 153Q TTYDISPLAYSTREAM 142Q ERROR 133Q INTERNAL 111Q TTYDISPLAYSTREAM 13Q NC.AskTEditPropsWindowHeight 10Q NC.AskTEditPropsWindowWidth 5 LASTMOUSEY 2 LASTMOUSEX) ( 230Q "List must contain an even number of items." 130Q (NCCollab.ExtraTEditPropsSelectionFnA0001) 62Q "(Preface expressions with ctrl-Y to have them eval'ed.)" 51Q "followed by carriage return." 40Q "Type sequence of pairs of attributes and values" 22Q "TEdit Props?") NCCollab.FontFetchFn D1 (I 1 Value I 0 Parameter) Ag Ag Ag h(27Q NC.FontFaceShorthand 24Q FONTPROP 15Q FONTPROP 6 FONTPROP) (21Q FACE 12Q SIZE 3 FAMILY) () NCCollab.ParamInstallFn D1 (I 2 Card I 1 Value I 0 Parameter) B @A (10Q NC.NoteFileProp 3 NCP.CardNoteFile) NIL () NCCollab.FontParamInstallFn D1 (I 2 Card I 1 Value I 0 Parameter) B @A µ gA (24Q NC.NoteFileProp 21Q APPLY 10Q FONTP 3 NCP.CardNoteFile) (15Q FONTCREATE) () NCCollab.CurrentCollaboratorCardP D1 (P 0 \NF I 0 Card) -@dÉHd`ð®´@H Y¿Ig (52Q NC.SameCardP 47Q NCP.NoteFileProp 33Q NC.NoteFileFromNoteFileUID) (44Q CurrentCollaboratorCard 27Q CardObject 17Q NoteFileTYPE# 4 CardObject) () NCCollab.InstallCollaboratorCardInfo D1 (P 0 ParameterPropPair I 0 Card) '@ °dH¹HH@lIµäh(3 NCP.CardSubstance) NIL () NCCollab.CollaboratorCardMakeFn D1 (P 12Q CollabInfoBox P 11Q NoteFile P 10Q Result P 6 \NF P 4 SuperType P 3 FieldValue P 2 CardTypeRecord P 1 CardTypeName P 0 NoteCardType I 3 ParamsPropList I 2 NoDisplayFlg I 1 Title I 0 Card) N @ɵ@ H!Id²q ZžJÉ[dgð²P¿IJd”É ´ I Zd¬oI ¿JÉ[dgð² ¿oogoIo  ¿Kgð—Ig €KL!Id²q ZžJÉ[dgð²P¿IJd”É ´ I Zd¬oI ¿JÉ[dgð² ¿oogoIo  ¿Kgð—Ig €K½@AB@C lM@ÉNd`ð³´@N _¿O O _ •@O O(511Q NCP.FileCards 502Q NCP.ValidCardP 475Q NCCollab.GetCollabInfoBox 455Q NC.NoteFileFromNoteFileUID 413Q NCCollab.MakeParamsPropList 377Q NC.GetCardTypeFieldOfSuper 361Q NC.ReportError 356Q CONCAT 306Q NC.ReportError 303Q CONCAT 270Q NC.CardTypeRecord 262Q NC.CardTypeLoader 225Q NC.CardTypeRecord 203Q NC.GetCardTypeFieldOfSuper 165Q NC.ReportError 162Q CONCAT 112Q NC.ReportError 107Q CONCAT 74Q NC.CardTypeRecord 66Q NC.CardTypeLoader 31Q NC.CardTypeRecord 13Q NC.GetType) (451Q CardObject 440Q NoteFileTYPE# 425Q CardObject 374Q MakeFn 366Q \\FILLME// 341Q MakeFn 322Q \\EMPTY// 313Q NoteCardType 255Q NoteCardType 242Q \\EMPTY// 233Q NoteCardType 200Q SuperType 172Q \\FILLME// 145Q SuperType 126Q \\EMPTY// 117Q NoteCardType 61Q NoteCardType 46Q \\EMPTY// 37Q NoteCardType 3 CardObject) ( 352Q " still \\EMPTY// after autoloading." 345Q " of card type " 336Q "Field name " 332Q "NC.GetCardTypeField" 277Q "Cannot find full definition of card type: " 156Q " still \\EMPTY// after autoloading." 151Q " of card type " 142Q "Field name " 136Q "NC.GetCardTypeField" 103Q "Cannot find full definition of card type: ") NCCollab.AddCollaboratorCard D1 NIL ggoo (20Q NCP.CreateCardType) (5 Inspector 2 Collaborator) ( 15Q ((DisplayedInMenuFlg T)) 11Q ((MakeFn NCCollab.CollaboratorCardMakeFn))) (PRETTYCOMPRINT NCCOLLABORATORCARDCOMS) (RPAQQ NCCOLLABORATORCARDCOMS ((* * This defines the Collaborator card type which inherits from Inspector.) (FILES (FROM NOTECARDS) NCINSPECTORCARD NCCOLLABORATION) (FNS NCCollab.MakeParamsPropList NCCollab.InitialsSelectionFn NCCollab.FontSelectionFn NCCollab.ExtraTEditPropsSelectionFn NCCollab.FontFetchFn NCCollab.ParamInstallFn NCCollab.FontParamInstallFn NCCollab.CurrentCollaboratorCardP NCCollab.InstallCollaboratorCardInfo) (FNS NCCollab.CollaboratorCardMakeFn NCCollab.AddCollaboratorCard) (P (NCCollab.AddCollaboratorCard) ( PUTPROP (QUOTE Collaborator) (QUOTE Don'tForceFilingFlg) T)))) (FILESLOAD (FROM NOTECARDS) NCINSPECTORCARD NCCOLLABORATION) (NCCollab.AddCollaboratorCard) (PUTPROP (QUOTE Collaborator) (QUOTE Don'tForceFilingFlg) T) (PUTPROPS NCCOLLABORATORCARD COPYRIGHT ("Xerox Corporation" 1986)) NIL