(FILECREATED " 9-Nov-84 12:20:54" ("compiled on " {PHYLUM}NOTECARDS>RELEASE1.1>RHTPATCH003.;8) " 1-Nov-84 14:14:14" recompiled changes: NC.MakeCardTypesList NC.GraphAddNodeFn NC.MakeGlobalLink NC.AddLinkToSketchCard NC.InsertLinkInText in "INTERLISP-D 1-Nov-84 ..." dated " 1-Nov-84 14:40:55") (FILECREATED " 9-Nov-84 12:20:12" {PHYLUM}NOTECARDS>RELEASE1.1>RHTPATCH003.;8 14736 changes to: ( VARS RHTPATCH003COMS) (FNS NC.GraphAddNodeFn NC.MakeGlobalLink NC.AddLinkToSketchCard NC.InsertLinkInText NC.LinkIconWhenCopiedFn NC.MakeCardTypesList) previous date: " 8-Nov-84 17:58:13" {PHYLUM}NOTECARDS>RELEASE1.1>RHTPATCH003.;6) NC.InspectorSelectionFn D1 (P 2 GlobalVar P 1 ValuesFn P 0 Answer I 2 InspectWindow I 1 ValueFlg I 0 Property F 5 InspectWin) wPAU g@Yg@ZI@`jIdKdodg dgjdndhdL XJHJ J Ji B@ B h(163Q INSPECTW.SELECTITEM 156Q INSPECTW.REDISPLAY 150Q SET 142Q SET 135Q EVAL 123Q MENU 10Q INSPECTW.SELECTITEM) (74Q DEFAULTMENUHELDFN 65Q CLRPROMPT 36Q MENUTYPE# 24Q NC.NoteCardsParameters 14Q NC.NoteCardsParameters) ( 56Q "Choose New Value") NC.TEditBasedP D1 (I 0 Type F 2 NC.CardTypes) ,@ @ bRHh@IIgHX(10Q NC.FetchType 3 NC.IDP) (43Q TEXT) () NC.CloseDatabaseFileA0001 D1 (NAME ERRORSET P 0 Window F 1 RESETVARSLST F 2 OpenWindows F 3 RESETY) \gd g Qcgd g QcR*dHg H XH i H hci(116Q BLOCK 112Q OPENWP 105Q NC.QuitCard 101Q NC.IDFromWindow 73Q EXPANDW 66Q GETWINDOWUSERPROP 41Q SETTOPVAL 32Q GETTOPVAL 15Q SETTOPVAL 6 GETTOPVAL) (63Q ICONFOR 36Q NC.ForceFilingFlg 26Q NC.ForceFilingFlg 12Q NC.ForceSourcesFlg 2 NC.ForceSourcesFlg) () NC.CloseDatabaseFileA0002 D1 (NAME ERRORSET F 0 RESETVARSLST F 1 PSA.Database F 2 RESETY) 7gd g Pcgd g PcQiho ci(61Q NC.CacheTypesAndTitles 41Q SETTOPVAL 32Q GETTOPVAL 15Q SETTOPVAL 6 GETTOPVAL) (36Q NC.ForceFilingFlg 26Q NC.ForceFilingFlg 12Q NC.ForceSourcesFlg 2 NC.ForceSourcesFlg) ( 56Q "Closing NoteFile.") NC.CloseDatabaseFile D1 (P 13Q RESETZ P 12Q RESETY P 11Q LISPXHIST P 10Q Window P 3 OpenWindows P 2 ID P 1 CardTotal P 0 File F 14Q PSA.Database F 15Q NC.MainMenu F 16Q LISPXHIST F 17Q RESETVARSLST) = @Wd hiol !ALQM[hiol oog hio W! Wog 5h5_ Og O_N Oh^L\O&g_ Ohdol hiol W! Wog hg_ OWi W W WoWhW g hciHo h(471Q NC.PrintMsg 454Q NC.DisplayMainMenu 450Q PUTWINDOWPROP 442Q WFROMMENU 407Q NC.ForceDatabaseClose 401Q FULLNAME 373Q NC.SaveNextLinkID 363Q ERROR! 354Q RESETRESTORE 341Q NC.CloseDatabaseFileA0002 317Q NC.PrintMsg 314Q CHARACTER 300Q NC.PrintMsg 275Q CHARACTER 260Q ERROR! 251Q RESETRESTORE 207Q NC.ActiveCardP 204Q NC.IDFromWindow 201Q GETWINDOWUSERPROP 167Q NC.IDFromWindow 154Q NC.CloseDatabaseFileA0001 132Q NC.PrintMsg 113Q NC.YesP 110Q NC.AskUser 71Q NC.PrintMsg 66Q CHARACTER 33Q OPENWINDOWS 25Q CHARACTER 11Q OPENP) (445Q CLOSEFN 431Q MENU 415Q MENU 347Q ERROR 336Q INTERNAL 244Q ERROR 176Q ICONFOR 151Q INTERNAL 105Q Yes) ( 466Q " closed." 421Q "No Open NoteFile" 333Q (NC.CloseDatabaseFileA0002) 307Q "Closing Notefile ... " 270Q "Done." 146Q (NC.CloseDatabaseFileA0001) 127Q "Closing and saving active cards ... " 102Q " -- " 76Q "Want to close and save them? " 61Q "There are cards still active on the screen." 20Q "There is no open NoteFile!!!") NC.MakeSearchCardA0001 D1 (NAME ERRORSET L (0 NIL) P 10Q ID P 6 ID P 5 Title P 1 ID# F 11Q RESETVARSLST F 12Q Window F 13Q PSA.Database F 14Q IDs F 15Q ListCardID F 16Q NC.ListContentsLinkLabel F 17Q RESETY F 20Q SearchString) g` hhWcWio Wi l kkRIdH?JcW ol k WO<Whol ci ^ ]W M NK Lh[IkYL&_WdOOWghW O_(261Q NC.InsertLinkBeforeMarker 202Q STRPOS 171Q NC.FetchTitle 165Q NC.IDFromNumber 156Q NC.PrintMsg 153Q CHARACTER 123Q TEDIT.INSERT 117Q CONCAT 114Q CHARACTER 107Q DATE 100Q NC.FetchSubstance 51Q SUBATOM 44Q NC.GetNewID 35Q NC.PrintMsg 10Q CURSOR) (252Q Title 5 WAITINGCURSOR 2 CURSOR) ( 146Q "Done!" 104Q " List compiled on: " 32Q "Searching for cards ...") NC.MakeSearchCard D1 (P 6 RESETZ P 5 RESETY P 4 LISPXHIST P 3 Window P 2 WindowOrID P 1 IDs P 0 SearchString I 2 NoDisplayFlg I 1 Title I 0 ListCardID F 7 LISPXHIST F 10Q RESETVARSLST) @@AoB Z@ J J[oohiK Xdo RdO@AoHo b KKgA W!Wog hg^ Nl Ki J(210Q NC.ClearMsg 203Q BLOCK 174Q ERROR! 166Q RESETRESTORE 154Q NC.MakeSearchCardA0001 132Q PUTWINDOWPROP 120Q NC.SetTitle 113Q CONCAT 66Q EQUAL 55Q NC.AskUser 32Q WINDOWP 26Q NC.ActivateCard 21Q NC.MakeTEditCard 5 SPAWN.MOUSE) (162Q ERROR 151Q INTERNAL 126Q TITLE) ( 146Q (NC.MakeSearchCardA0001) 110Q "%" in title" 103Q "Cards with %"" 63Q "" 46Q " -- " 42Q "Please enter the search string" 15Q "SearchCard") NC.MakeCardTypesList D1 (F 0 NC.CardTypes F 1 NC.NoteCardTypeMenu) ghddddddddddddghhcgggghghdddddddg gggghghdddddddg gggghghdddddddg gggghdddddddddg ggggghddddddddg gggghdddddddg gggghdddddddg gggghdddddddg hc(420Q NC.AddCardType 365Q NC.AddCardType 332Q NC.AddCardType 277Q NC.AddCardType 240Q NC.AddCardType 203Q NC.AddCardType 144Q NC.AddCardType 105Q NC.AddCardType) (414Q Icon 401Q NC.MakeDocument 376Q TEXT 373Q Text 370Q Document 361Q Title 346Q NC.MakeLinkIndex 343Q TEXT 340Q Text 335Q LinkIndex 326Q Title 313Q NC.MakeSearchCard 310Q TEXT 305Q Text 302Q Search 273Q Title 257Q NC.BringUpBrowserCard 254Q NC.MakeBrowserCard 251Q GRAPH 246Q Graph 243Q Browser 234Q Title 217Q NC.MakeContentsCard 214Q TEXT 211Q Text 206Q FileBox 177Q Icon 164Q NC.SketchCardCloseFn 160Q NC.MakeSketchCard 155Q SKETCH 152Q NoteCard 147Q Sketch 140Q Title 125Q NC.GraphCardCloseFn 121Q NC.MakeGraphCard 116Q GRAPH 113Q NoteCard 110Q Graph 101Q Icon 66Q NC.TEditCloseFn 62Q NC.MakeTEditCard 57Q TEXT 54Q NoteCard 51Q Text 22Q Icon 2 NoteCard) () NC.BringUpBrowserCard D1 (P 2 AttachedWin P 0 Window I 2 Region/Position I 1 Substance I 0 ID) =@AB Xd IhH@ g hZg JiIY(57Q GETWINDOWUSERPROP 45Q NC.MakeLinksLegendMenu 42Q LISTGET 34Q NC.RetrievePropList 15Q ATTACHEDWINDOWS 10Q NC.BringUpGraphCard) (54Q NCLABELPAIRS 37Q BrowserLinksLegend) () NC.GraphAddNodeFn D1 (P 1 Link P 0 LinkLabel I 1 Window I 0 Graph F 2 NodeID) ; Ag @A Ahdid XAH Yc I hA (70Q NODECREATE 65Q CURSORPOSITION 60Q NC.MakeLinkIcon 54Q FASSOC 47Q GENSYM 41Q NC.MakeLink 31Q NC.AskLinkLabel 17Q DEFAULT.ADDNODEFN 11Q PUTWINDOWPROP) (6 NoteCardInsertingLink) () NC.MakeGlobalLink D1 (P 0 Link I 4 DisplayMode I 3 SourceID I 2 DestinationID I 1 LinkLabel I 0 Window) @ABCDg H CHC  H(33Q NC.SetGlobalLinks 27Q NC.FetchGlobalLinks 13Q NC.MakeLink) (7 GlobalGlobal) () NC.AddLinkToSketchCard D1 (P 1 Link P 0 Label I 0 SketchWindow) #@hdid H@Hhdg Yd@ (40Q NC.InsertLinkInSketch 31Q NC.MakeLink 10Q NC.AskLinkLabel) (25Q Icon) () NC.InsertLinkInText D1 (P 3 Link P 2 Selection P 1 TextObject P 0 Window I 4 DisplayMode I 3 SourceID I 2 DestinationID I 1 LinkLabel I 0 TextStream) r@ @ 2IZMHABCD [d? I JdgJgIkJ kؼdLL Koo h(156Q NC.ReportError 141Q TEDIT.INSERT.OBJECT 54Q TEXTSTREAM 50Q NC.MakeLinkIcon 41Q NC.MakeLink 7 TEXTOBJ 3 WINDOW.FROM.TEDIT.THING) (123Q SELECTION 113Q TEXTOBJ 104Q RIGHT 75Q SELECTION 66Q LEFT 60Q SELECTION 24Q SELECTION 16Q TEXTOBJ) ( 153Q "No selection set when inserting link image object." 147Q "NC.InseretLinkInText") (PRETTYCOMPRINT RHTPATCH003COMS) (RPAQQ RHTPATCH003COMS ((FNS NC.InspectorSelectionFn NC.TEditBasedP NC.CloseDatabaseFile NC.MakeSearchCard NC.MakeCardTypesList NC.BringUpBrowserCard) (* Fixes of functions that call NC.MakeLink) (FNS NC.GraphAddNodeFn NC.MakeGlobalLink NC.AddLinkToSketchCard NC.InsertLinkInText))) (PUTPROPS RHTPATCH003 COPYRIGHT ("Xerox Corporation" 1984)) NIL