(DEFINE-FILE-INFO §READTABLE "INTERLISP" §PACKAGE "INTERLISP") (FILECREATED " 9-Mar-87 15:44:00" ("compiled on " {ERIS}SOURCES>LAFITEBROWSE.;21) " 9-Mar-87 13:16:50" bcompl'd in "Xerox Lisp 9-Mar-87 ..." dated " 9-Mar-87 13:43:48") (FILECREATED " 2-Dec-86 19:28:10" {ERIS}SOURCES>LAFITEBROWSE.;21 181898 changes to%: (FNS \LAFITE.PREPARE.BROWSER \LAFITE.PREPARE.NEW.BROWSER LAB.PROMPTPRINT) (VARS LAFITEBROWSECOMS) previous date%: " 9-Oct-86 14:22:22" {ERIS}SOURCES>LAFITEBROWSE.;20) \LAFITE.BROWSE :D4 (I 4 OPTIONS I 3 FILE I 2 BUTTON I 1 MENU I 0 ITEM) dBgð“g‚g@dždiðª3µ g@hAdždiðª3µ gAhCdždiðª3µ gChDd´diðª3µ gDhhg (97 \LAFITE.PROCESS) (94 LAFITEBROWSE 81 QUOTE 62 QUOTE 44 QUOTE 26 QUOTE 12 \LAFITE.BROWSE.PROC 8 \LAFITE.SUBBROWSE 3 MIDDLE) () \LAFITE.SUBBROWSE :D4 (P 0 COMMAND I 1 MENU I 0 ITEM) %`µ`o H´ @AlHh(20 MENU 14 \LAFITE.CREATE.MENU) (17 LAFITESUBBROWSEMENU 7 LAFITESUBBROWSEMENUITEMS 2 LAFITESUBBROWSEMENU) ( 11 "Browse subcommands") \LAFITE.BROWSE.PROCA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 ITEM F 1 FOLDERNAME F 2 MENU F 3 OPTIONS) P•PR ¿Q ` cS (23 \LAFITE.PREPARE.BROWSER 17 LA.LONGFILENAME 11 U-CASE 6 LA.RESETSHADE) (14 LAFITEMAIL.EXT) () \LAFITE.BROWSE.PROCA0002 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 OPTIONS F 1 MAILFOLDER) ;QÉ hgPgð¨PšgP”Q ¿Q PgðªP´gP´QÉ$ (56 SHRINKW 33 LAB.LOADFOLDER 28 \LAFITE.FIX.LAUREL.FOLDER 9 OBTAIN.MONITORLOCK) (46 SHRINK 37 SHRINK 21 LAUREL 13 LAUREL 6 WITH.MONITOR) () \LAFITE.BROWSE.PROC :D4 (P 4 SI::*RESETFORMS* P 3 SI::*LOCKED-MONITOR* P 2 SI::*RESETFORMS* P 1 LISPXHIST P 0 MAILFOLDER I 3 OPTIONS I 2 FOLDERNAME I 1 MENU I 0 ITEM F 5 LISPXHIST) :B¦b´.Ug ¿ X´ g ¿ H(54 CL:VALUES-LIST 50 SI::MONITOR-UNWIND 47 \MVLIST 44 \LAFITE.BROWSE.PROCA0002 31 CL:VALUES-LIST 27 SI::RESETUNWIND 24 \MVLIST 21 \LAFITE.BROWSE.PROCA0001 7 \LAFITE.PROMPTFORFOLDER) (41 SI::MONITOR-UNWIND 18 SI::RESETUNWIND) () \LAFITE.PREPARE.BROWSERA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 1 BROWSERWINDOW P 0 MAILFOLDER I 0 SI::*CLEANUP-FORMS* F 2 FOLDERNAME F 3 OPTIONS) 0`hg R XdšÉ$Yµ HRS ”I ƒI h(44 EXPANDW 39 TOTOPW 34 OPENWP 30 \LAFITE.PREPARE.NEW.BROWSER 16 \LAFITE.GETMAILFOLDER 9 OBTAIN.MONITORLOCK) (6 WITH.MONITOR 2 \LAFITE.BROWSELOCK) () \LAFITE.PREPARE.BROWSER :D4 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 1 OPTIONS I 0 FOLDERNAME) g ¿ (18 CL:VALUES-LIST 14 SI::MONITOR-UNWIND 11 \MVLIST 8 \LAFITE.PREPARE.BROWSERA0001) (5 SI::MONITOR-UNWIND) () \LAFITE.PREPARE.NEW.BROWSERA0001 :D4 (I 0 C) gh (6 RETFROM) (2 \LAFITE.OPENSTREAM) () \LAFITE.PREPARE.NEW.BROWSERA0002 :D4 (I 0 C F 0 FOLDERNAME) "` ¿o` ¿P` gh (31 RETFROM 24 PRIN1 16 PRIN1 5 TERPRI) (27 \LAFITE.PREPARE.NEW.BROWSER 21 PROMPTWINDOW 13 PROMPTWINDOW 2 PROMPTWINDOW) ( 10 "Could not open ") \LAFITE.PREPARE.NEW.BROWSER :D4 (P 2 *CONDITION-HANDLER-BINDINGS* P 1 ERRN P 0 STREAM I 2 OPTIONS I 1 FOLDERNAME I 0 MAILFOLDER F 3 *CONDITION-HANDLER-BINDINGS*) ‰@ÉHµ8ggggSAggiX³:Bgð³'B²gBœ°g`°(oA i ²!Aggi¸@H ¿@H¿@ @A ¿@` h(130 DREMOVE 122 FORGETMAILFILE 116 LAB.CREATEWINDOW 104 FULLNAME 98 \LAFITE.OPENSTREAM 85 MOUSECONFIRM 81 CONCAT 71 SETFILEINFO 39 \LAFITE.OPENSTREAM) (133 \ACTIVELAFITEFOLDERS 127 \ACTIVELAFITEFOLDERS 94 NEW 91 BOTH 68 LAFITEBUFFERSIZE 65 BUFFERS 57 NOCONFIRM 47 NOCONFIRM 35 OLD 32 INPUT 21 \LAFITE.PREPARE.NEW.BROWSERA0002 18 SERIOUS-CONDITION 14 \LAFITE.PREPARE.NEW.BROWSERA0001 11 XCL:FILE-NOT-FOUND) ( 77 "Click LEFT to confirm creating ") LAB.LOADFOLDER :D4 (I 0 MAILFOLDER) @ ´@kÍ@jÍ@ (17 LAB.DISPLAYFOLDER 3 LOADMAILFOLDER) NIL () LAB.DISPLAYFOLDER :D4 (P 2 MSGDESCRIPTOR P 1 CLIPREGION P 0 WINDOW I 0 MAILFOLDER) k@É$!H @ @h4@h@ Zµ@Èjð²8@io°;@ hH Yýñ²àJÈI@ÈlÚÛÙ@ÈÚH ¿°Å@dI @I h(103 LAB.DISPLAYLINES 100 LASTVISIBLEMESSAGE 95 FIRSTVISIBLEMESSAGE 86 WYOFFSET 55 DSPCLIPPINGREGION 50 MESSAGE#.TO.YPOS 44 LAB.PROMPTPRINT 25 LAB.MAKE.INITIAL.SELECTION 13 LAB.SETUP 9 CLEARW) NIL ( 41 "Folder is empty.") LAB.MAKE.INITIAL.SELECTION :D4 (P 3 I P 2 MSGDESCRIPTOR P 1 MESSAGES P 0 LASTMSG# I 0 MAILFOLDER) E@È@É2Hjð‘h@kH[•IK H¼k[Ló³IK ZÊ jðJÊjð–J@ JKkÔ°Þ(60 SELECTMESSAGE 41 ELT 27 ELT 20 LAB.FIND.SELECTED.MSG) NIL () LAB.CREATEWINDOWA0009 :D4 (I 0 W) nÿÿ@ (6 LINELENGTH) NIL () LAB.CREATEWINDOW :D4 (P 8 WHOLEREGION P 7 MENUREGION P 6 HEIGHT P 5 WIDTH P 4 BROWSERWINDOW P 3 BROWSERMENU P 2 BROWSERMENUWINDOW P 1 BROWSERPROMPTWINDOW P 0 TITLE I 0 MAILFOLDER) ²o@É ¡ `d`¿di¿dg¿d`¿dg ¿dg¿jdnÿdh_¿dO ¿[d Z É_d]`È ^`_µi²3`l ²)`°É$’h°êO°ßd3•µùi¿h—` °oH ¿MNlÚhddd ¿_d]OONOØÙjdMNhhdiYdgjNIgnÿÿNiI `I OH \JLggILggI nÿÿI Igg@H,Lg@Lgg@L$@J(@K&@I*LggLggLggLggLggiLggiLggL(430 WINDOWADDPROP 420 WINDOWADDPROP 409 WINDOWADDPROP 398 PUTWINDOWPROP 388 PUTWINDOWPROP 378 PUTWINDOWPROP 368 PUTWINDOWPROP 342 PUTWINDOWPROP 332 PUTWINDOWPROP 320 WINDOWADDPROP 310 LINELENGTH 303 CLEARW 299 ATTACHWINDOW 288 ATTACHWINDOW 276 CREATEW 270 DSPFONT 263 DSPSCROLL 258 PUTWINDOWPROP 246 PUTWINDOWPROP 235 CREATEW 191 CLRPROMPT 188 GETREGION 174 PROMPTPRINT 164 COPY 125 EQLENGTH 105 HEIGHTIFWINDOW 85 \INSUREWINDOW 81 MENUWINDOW 9 CONCAT) (427 LAB.RESHAPEFN 424 RESHAPEFN 416 LAB.SHRINKFN 413 SHRINKFN 405 LAB.CLOSEFN 402 CLOSEFN 395 LAB.BUTTONEVENTFN 392 RIGHTBUTTONFN 385 LAB.BUTTONEVENTFN 382 BUTTONEVENTFN 375 LAB.ICONFN 372 ICONFN 365 LAB.REPAINTFN 362 REPAINTFN 339 LAB.SCROLLFN 336 SCROLLFN 328 MAILFOLDER 317 LAB.CREATEWINDOWA0009 314 RESHAPEFN 296 JUSTIFY 293 TOP 285 JUSTIFY 282 TOP 266 LAFITEBROWSERFONT 250 MAXSIZE 240 MINSIZE 161 LAFITEBROWSERREGION 130 LAFITEBROWSERREGION 120 LAFITEBROWSERREGION 109 \ACTIVELAFITEFOLDERS 100 FONTDESCRIPTOR 97 LAFITEBROWSERFONT 53 DEFAULTMENUHELDFN 46 CLRPROMPT 39 LAFITEMENUFONT 32 LAB.COMMANDFN 20 LAFITEBROWSERMENUITEMS 15 |MENUTYPE#|) ( 170 "Specify region for " 3 "Mail browser for ") LAB.COMMANDFN :D4 (P 1 MAILFOLDER P 0 WINDOW I 2 KEY I 1 MENU I 0 ITEM) 6`£¿A g !Hg YdÊjð®@ ºHI@ABlJh(39 EXTRACTMENUCOMMAND 27 GETWINDOWUSERPROP 17 GETWINDOWUSERPROP 11 WFROMMENU 6 CHECKLAFITEMAILFOLDERS) (24 MAILFOLDER 14 MAINWINDOW 2 \LAFITE.READY) () LAB.ASSURE.SELECTIONS :D4 (I 0 MAILFOLDER) @È@Èñ´@ioi(17 LAB.PROMPTPRINT) NIL ( 14 "No messages selected.") LAB.SETUP :D4 (P 7 XPOS P 6 SPACEWIDTH P 5 DIGITWIDTH P 4 ASCENT P 3 TOTALHEIGHT P 2 HEIGHT P 1 WIDTH P 0 WINDOW I 0 MAILFOLDER) @É$‘ H ` dH nÿÿH n'H @`ÈZÍ@`È\Í@`ÈÍ@hH LØ @Hg YÍ@ÈJÚ[Hg@j@É KÙIKh_¿Ol9` ]lr` ^@`lm` MâØØ_Í@ONlÖMlÖØÔ_Í@OMlÖNlÖl-` g` ØØØÔ_Í@O`lA` Ö`IOÙê _¿dOñ¢¿OÔ_Í@ONlÖÙÍ@MÍh(244 FIXR 232 CHARWIDTH 210 STRINGWIDTH 201 CHARWIDTH 157 CHARWIDTH 144 CHARWIDTH 135 CHARWIDTH 127 PUTWINDOWPROP 90 GETWINDOWPROP 78 DSPYPOSITION 37 LINELENGTH 30 DSPRIGHTMARGIN 23 DSPFONT 15 FONTCREATE 9 CLEARW) (236 LAFITEFROMFRACTION 229 LAFITEBROWSERFONT 224 LAFITEMINFROMCHARS 207 LAFITEBROWSERFONT 204 MAY 198 LAFITEBROWSERFONT 154 LAFITEBROWSERFONT 149 BROWSERMARKXPOSITION 141 LAFITEBROWSERFONT 132 LAFITEBROWSERFONT 103 EXTENT 87 WIDTH 68 FONTDESCRIPTOR 65 LAFITEBROWSERFONT 56 FONTDESCRIPTOR 53 LAFITEBROWSERFONT 44 FONTDESCRIPTOR 41 LAFITEBROWSERFONT 18 LAFITEBROWSERFONT 12 LAFITEBROWSERFONT) () LAB.BUTTONEVENTFN :D4 (I 0 WINDOW) D@ h@ @ @ —@g `lålð”@ `´`låkð´ @g (65 LAB.DO.UNLESS.BUSY 42 DOWINDOWCOM 27 LAB.DO.UNLESS.BUSY 19 INSIDEP 16 LASTMOUSEY 12 LASTMOUSEX 8 DSPCLIPPINGREGION 3 TOTOPW) (62 LAFITEEXTRABROWSERCOMMANDFN 51 LASTMOUSEBUTTONS 46 LAFITEEXTRAMENUFLG 31 LASTMOUSEBUTTONS 24 LAB.SELECTMESSAGE) () LAB.DO.UNLESS.BUSYA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 0 MAILFOLDER I 0 SI::*CLEANUP-FORMS* F 1 WINDOW F 2 ARGUMENT F 3 FN) 'Qg HÊjð³HÉ id´QHRlSh(25 OBTAIN.MONITORLOCK 6 GETWINDOWUSERPROP) (3 MAILFOLDER) () LAB.DO.UNLESS.BUSY :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 ARGUMENT I 1 FN I 0 WINDOW F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 LAB.DO.UNLESS.BUSYA0001) (6 SI::RESETUNWIND) () LOADMAILFOLDER :D4 (P 1 CONTENTSFILE P 0 MAILFILE I 0 MAILFOLDER) f@É!H Y •@I ¥@ ²B@o @dÈk@ÉLKó³ML Êjð¤Lµi†LkÔ\°èh‘k€jZÏ0¿Jjðhð@@o h(98 LAB.PROMPTPRINT 55 ELT 34 LAB.PROMPTPRINT 24 PARSEMAILFOLDER 19 READTOCFILE 13 INFILEP 9 TOCFILENAME) NIL ( 95 "Failed." 31 " done.") \LAFITE.GETMAILFOLDER :D4 (P 9 STREAM P 5 NEWFOLDER P 4 SHORTNAME P 3 VERSIONLESSNAME P 2 UNPACKEDNAME P 1 FOLDER I 0 FOLDERNAME) `Hµphµ‚± @ b aJghJ [d@ð’±`^µ[h¢±„MÉ$¤MÉ²^` ¿o` ¿@` ¿o` ¿o` hYÉ@ §IÉ@ ’I°HX±ÿx]ÉKð•Mµ¥i°N°”MÉ Oµ M@°f ¿Mh¿°ðJ` ¼`@Kðhð´@_¿dO¿dK¿dL¿K _¿dO ¿]`¿L`³`L`¿i¿hM(233 CREATE.MONITORLOCK 197 LA.SHORTFILENAME 182 CLOSEF? 135 STRING-EQUAL 127 STRING-EQUAL 117 PRIN1 106 PRIN1 95 PRIN1 87 PRIN1 76 TERPRI 41 PACKFILENAME 37 LISTPUT 26 UNPACKFILENAME.STRING 21 U-CASE) (279 LAFITEFOLDERSMENU 274 \LAFITEPROFILECHANGED 266 LAFITEMAILFOLDERS 262 LAFITEMAILFOLDERS 255 LAFITEMAILFOLDERS 250 \ACTIVELAFITEFOLDERS 246 \ACTIVELAFITEFOLDERS 201 |MAILFOLDERTYPE#| 194 LAFITEMAIL.EXT 114 PROMPTWINDOW 103 PROMPTWINDOW 92 PROMPTWINDOW 84 PROMPTWINDOW 73 PROMPTWINDOW 52 \ACTIVELAFITEFOLDERS 33 VERSION 2 \ACTIVELAFITEFOLDERS) ( 111 "Multiple versions may not be manipulated at once." 100 " is already being browsed." 81 "A different version of ") LAB.REPAINTFNA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 MAILFOLDER F 1 REGION) PÉ idžPdQ PQ P (27 MAILFOLDERBUSY 22 LAB.DISPLAYLINES 19 LASTVISIBLEMESSAGE 14 FIRSTVISIBLEMESSAGE 7 OBTAIN.MONITORLOCK) NIL () LAB.REPAINTFN :D4 (P 2 SI::*RESETFORMS* P 1 LISPXHIST P 0 MAILFOLDER I 1 REGION I 0 WINDOW F 3 LISPXHIST) 0@g HÈjð³HÊjð³Sg ¿ h(44 CL:VALUES-LIST 40 SI::RESETUNWIND 37 \MVLIST 34 LAB.REPAINTFNA0001 6 GETWINDOWUSERPROP) (31 SI::RESETUNWIND 3 MAILFOLDER) () LAB.SCROLLFNA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 0 MAILFOLDER I 0 SI::*CLEANUP-FORMS* F 1 WINDOW F 2 DX F 3 DY F 4 CONTINUOUSFLG) *Qg HÊjð³HÉ id—QRSTƒH h(38 MAILFOLDERBUSY 33 SCROLLBYREPAINTFN 25 OBTAIN.MONITORLOCK 6 GETWINDOWUSERPROP) (3 MAILFOLDER) () LAB.SCROLLFN :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 3 CONTINUOUSFLG I 2 DY I 1 DX I 0 WINDOW F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 LAB.SCROLLFNA0001) (6 SI::RESETUNWIND) () LAB.RESHAPEFNA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 2 MSG# P 1 REGION P 0 MAILFOLDER I 0 SI::*CLEANUP-FORMS* F 3 WINDOW F 4 OLDIMAGEBM F 5 OLDREGION) WSg hS HÉ id³0¿HÉ hi¿HI ZH JkÙHÈÚS HJHI hHÊjð²ÙSTU(84 RESHAPEBYREPAINTFN 68 LAB.DISPLAYLINES 65 LASTVISIBLEMESSAGE 58 WYOFFSET 47 LAB.SETUP 42 FIRSTVISIBLEMESSAGE 36 OBTAIN.MONITORLOCK 27 ALLOW.BUTTON.EVENTS 22 OBTAIN.MONITORLOCK 11 DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (3 MAILFOLDER) () LAB.RESHAPEFN :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 OLDREGION I 1 OLDIMAGEBM I 0 WINDOW F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 LAB.RESHAPEFNA0001) (6 SI::RESETUNWIND) () LAB.CLOSEFN :D4 (I 0 BROWSERWINDOW) @g (6 LAB.CLOSE/SHRINK) (3 CLOSE) () LAB.SHRINKFN :D4 (I 0 WINDOW) @g (6 LAB.CLOSE/SHRINK) (3 SHRINK) () LAB.CLOSE/SHRINKA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 1 HOW? P 0 MAILFOLDER I 0 SI::*CLEANUP-FORMS* F 2 BROWSERWINDOW F 3 FLG) šRg HÉ id²rR –HÉ* ¿HÊjð§Hi YµgYd¨g °öRdždiðª3µ gRhHdždiðª3µ gHhSd´diðª3µ gShhg g` ¿o` g(148 PRIN1 137 TERPRI 127 \LAFITE.PROCESS 59 MENU 43 LAB.CHOOSE.UPDATE.MENU 30 CLEARW 23 OPENWP 17 OBTAIN.MONITORLOCK 6 GETWINDOWUSERPROP) (151 DON'T 145 PROMPTWINDOW 134 PROMPTWINDOW 130 DON'T 124 LAFITEUPDATE 112 QUOTE 93 QUOTE 75 QUOTE 55 DON'T 49 \LAFITE.FINISH.UPDATE 3 MAILFOLDER) ( 142 "Browser is busy, can't close") LAB.CLOSE/SHRINK :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 FLG I 0 BROWSERWINDOW F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 LAB.CLOSE/SHRINKA0001) (6 SI::RESETUNWIND) () LAB.EXPANDFNA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 1 REGION P 0 FIRSTCHANGEDMSG# I 0 SI::*CLEANUP-FORMS* F 3 MAILFOLDER F 4 BROWSERWINDOW) KSÉ hgSÉ6!TggiHd²,jð•S °SHShT Y ºdJñ¡¿JSI ¿Sh6h(66 LAB.DISPLAYLINES 63 LASTVISIBLEMESSAGE 51 FIRSTVISIBLEMESSAGE 47 DSPCLIPPINGREGION 37 LAB.DISPLAYFOLDER 26 WINDOWADDPROP 9 OBTAIN.MONITORLOCK) (22 LAB.SHRINKFN 19 SHRINKFN 6 WITH.MONITOR) () LAB.EXPANDFN :D4 (P 2 SI::*RESETFORMS* P 1 SI::*LOCKED-MONITOR* P 0 MAILFOLDER I 0 BROWSERWINDOW) @g !g ¿ h(25 CL:VALUES-LIST 21 SI::MONITOR-UNWIND 18 \MVLIST 15 LAB.EXPANDFNA0001 6 GETWINDOWUSERPROP) (12 SI::MONITOR-UNWIND 3 MAILFOLDER) () LAB.SELECTMESSAGE :D4 (P 15 MARKRIGHT P 14 LASTY P 13 LASTX P 12 MSG P 11 OLDLASTMOUSEBUTTONS P 10 CTRLDOWN P 9 OLDSEL# P 8 SEL# P 7 TOCSTATE P 6 LASTVISIBLE# P 5 FIRSTVISIBLE# P 4 LAST# P 3 FIRST# P 2 SELECTIONREGION P 1 MESSAGES P 0 MAILFOLDER I 0 WINDOW) Ò@g ñ HÈjð´h@ ZHÈ\HÈ[HJ ]HJ ^HÉYHÈ_¿J@ _@ _³1Ojð§¿h_¿`lå_ jð’±O ˜O ’±ö¿°½`lå_"jð³4O"µ)`Oñ’±éOOñ¢±àOjð§¿h_¿H ¿°„ ²ÖOdkð²M¿HÉHÈkÙHÈO&kÔ_&O(ñ³O$O& dÊ jð’¿°æjÏ ¿°ßIO kÏ ¿HdOÍ¿OÍ°^lð™HOdi°POdlð–¿HOd°?lðœHLkØOO°1Odlð¿HOKkÙO°lð–HOkØL‹Olð™HKOkÙ¿`gð´‚±þ¡H ¿±þ˜@ H _Oð™`Oð’±þ¤g §g ²@Odlðž¿HIO g…jð£¿IO _Ê jð®HOg¿l±Ûj±×`dlåjð³0¿OkðHIO gˆMN ¿k_¿HIO g± kåjð³@Odlðž¿HIO g…jð£¿IO _Ê jðžHOg¿l±^j±Z`dlåjð’±S¿Odlð².¿OdOñž¿OkØOO±/Lñ’O„j_¿LkØO ±lð²-OdOñž¿OOkÙO±ÿKOñ’O„j_¿KkÙ ±êOdlð²=¿OOñ³OkØLOñ’O„j_¿L ±ÃKdOñ¬¿OkØO ±°L ¿j±¥lð²6OdOñ³Kñ’O„j_¿KOkÙ ±…LñªOOkÙ °vKL ¿j°kKLñ³iOjð£¿l`lÂåjð‘j€kjð_¿OLñžLkØOO¿l°5KOñžOKkÙO¿l°!OLKØâñ›OkØL ¿lŠKOkÙ ¿l_¿`_¿Ojðhð´O_¿±üj(948 LA.DECONSIDERRANGE 936 LA.DECONSIDERRANGE 915 LA.CONSIDERRANGE 895 LA.CONSIDERRANGE 859 LA.UNDOSELECTION 842 LA.RECONSIDERRANGE 835 LA.DECONSIDERRANGE 820 LA.RECONSIDERRANGE 784 LA.RECONSIDERRANGE 777 LA.DECONSIDERRANGE 758 LA.RECONSIDERRANGE 719 LA.RECONSIDERRANGE 698 LA.CONSIDERRANGE 671 LA.RECONSIDERRANGE 650 LA.CONSIDERRANGE 598 LA.SHOW.SELECTION 581 ELT 574 LA.UNDOSELECTION 567 LA.SHOW.SELECTION 561 ELT 537 LA.SHOW.SELECTION 531 ELT 519 LA.DECONSIDERRANGE 513 LA.SHOW.SELECTION 507 ELT 473 LA.SHOW.SELECTION 456 ELT 449 LA.UNDOSELECTION 442 LA.SHOW.SELECTION 436 ELT 419 SHIFTDOWNP 412 SHIFTDOWNP 390 YPOS.TO.MESSAGE# 386 LASTMOUSEY 378 LA.VERIFY.SELECTION 360 LA.DESELECTRANGE 332 LA.SELECTRANGE 311 LA.SELECTRANGE 280 LA.SELECTRANGE 250 ELT 226 ELT 184 \FZEROP 178 LAB.CHANGEMARK 169 LA.UNDOSELECTION 121 BLOCK 114 \FZEROP 85 LA.UNDOSELECTION 75 INSIDEP 70 LASTMOUSEY 64 LASTMOUSEX 58 GETMOUSESTATE 45 LASTVISIBLEMESSAGE 39 FIRSTVISIBLEMESSAGE 25 DSPCLIPPINGREGION 6 GETWINDOWUSERPROP) (957 LASTMOUSEBUTTONS 865 \LASTKEYSTATE 611 LASTMOUSEBUTTONS 595 REPLACE 564 ERASE 534 REPLACE 510 ERASE 486 LASTMOUSEBUTTONS 470 ERASE 439 REPLACE 416 CTRL 409 SHIFT 399 LASTMOUSEBUTTONS 367 TOC 364 LAFITEVERIFYFLG 145 BROWSERMARKXPOSITION 127 LASTMOUSEBUTTONS 93 LASTMOUSEBUTTONS 3 MAILFOLDER) () LAB.CHANGEMARK :D4 (P 9 BOTTOM P 8 TOP P 7 Y P 6 X P 5 REGION P 4 COCKED P 3 OLDSEL# P 2 SEL# P 1 RIGHT P 0 WINDOW I 0 MAILFOLDER) “@É$@È’ hH ]_MMkÙØ_¿H ^`ýñ³NIñ³H _Oýñ¥OOñ™L´@K h`lå_jð³"OµO@ ZKð³µL²@K ° ²èL´Ò@K °Êi\¿@J[ ¿°(142 LA.INVERT.MARK.BOX 131 LA.READ.NEW.MARK 121 \FZEROP 116 LA.INVERT.MARK.BOX 103 YPOS.TO.MESSAGE# 77 LA.INVERT.MARK.BOX 56 LASTMOUSEY 39 LASTMOUSEX 34 GETMOUSESTATE 13 DSPCLIPPINGREGION) (82 LASTMOUSEBUTTONS 43 BROWSERMARKXPOSITION) () LA.READ.NEW.MARK :D4 (P 3 MARK P 2 YPOS P 1 WINDOW P 0 MSG I 1 MSG# I 0 MAILFOLDER F 4 SI::*RESETFORMS*) ®@ÉA @É$"g@É*hhdTcgH@hhdTcgI hhTcgIghdhdTc@IH@ Zgj @io`JI[l ýñ³.Klñ³(HlÏQ¿HK`ð§K`ð¡k€jÏ ¿HKÏ¿@kÏ h(119 \GETKEY 116 MOVETO 108 LAB.PROMPTPRINT 99 LA.BLT.MARK.BOX 90 MESSAGE#.TO.YPOS 53 TTYDISPLAYSTREAM 6 ELT) (150 HEARDMARK 144 UNSEENMARK 111 BROWSERMARKXPOSITION 94 REPLACE 69 PROCESS 65 WINDOWPROP 49 TTYDISPLAYSTREAM 32 LA.SHOW.MARK 15 CLEARW) ( 105 "Type single character mark, or ESC to abort") YPOS.TO.MESSAGE# :D4 (L (1 MAILFOLDER 0 YPOS)) !AÉ @ÙAÈØAÈÛdjñ¡kAÈHdIñINIL NIL () MESSAGE#.TO.YPOS :D4 (L (1 MAILFOLDER 0 MSGDESCRIPTOR)) AÉ AÈ@ÈÚÙNIL NIL () LA.CONSIDERRANGE :D4 (P 2 MSG P 1 I I 2 EVENIFDELETED I 1 LAST# I 0 FIRST# F 3 LASTVISIBLE# F 4 FIRSTVISIBLE# F 5 MESSAGES F 6 MAILFOLDER) 6AdSñ‘¿S@dTñ¡¿TIHó‘hUI ºB¦JÊjð˜VJg¿IkÔY°ß(45 LA.SHOW.SELECTION 27 ELT) (42 REPLACE) () LA.DECONSIDERRANGE :D4 (P 1 I I 1 LAST# I 0 FIRST# F 2 LASTVISIBLE# F 3 FIRSTVISIBLE# F 4 MAILFOLDER F 5 MESSAGES) +AdRñ‘¿R@dSñ¡¿SIHó‘hTUI g¿IkÔY°ê(34 LA.SHOW.SELECTION 28 ELT) (31 ERASE) () LA.RECONSIDERRANGE :D4 (P 2 MSG P 1 I I 1 LAST# I 0 FIRST# F 3 LASTVISIBLE# F 4 FIRSTVISIBLE# F 5 MAILFOLDER F 6 MESSAGES) 7AdSñ‘¿S@dTñ¡¿TIHó‘hUVI ZdÊ jð£g‚g¿IkÔY°Þ(46 LA.SHOW.SELECTION 28 ELT) (43 ERASE 39 REPLACE) () LA.SELECTRANGE :D4 (L (3 EVENIFDELETED 2 LAST# 1 FIRST# 0 MAILFOLDER)) R@É@È@È3BA½¼MLó³HM »C¦KÊjð•KkÏ ¿MkÔ]°ãIJñ¦A@Èýñ”@AÍ¿IJñ¦B@Èñ´@BÍh(25 ELT) NIL () LA.DESELECTRANGE :D4 (P 0 MESSAGES I 2 LAST# I 1 FIRST# I 0 MAILFOLDER) _ABñ³Y@É!BAº¹JIó¯HJ jÏ ¿JkÔZ°ïA@Èð²@dBkØ@Èµ@jÍ¿@ÈkØÍ°B@Èð´@ddÈAkÙµkÍh(86 LAB.REV.FIND.SELECTED.MSG 52 LAB.FIND.SELECTED.MSG 23 ELT) NIL () LAB.FIND.SELECTED.MSG :D4 (L (2 LAST# 1 FIRST# 0 MAILFOLDER)) &BA@ÉIHó³JI Ê jð¤IµiIkÔY°èh(17 ELT) NIL () LAB.REV.FIND.SELECTED.MSG :D4 (L (2 LAST# 1 FIRST# 0 MAILFOLDER)) 'AB@ÉHIó³JI Ê jð¤IµiImÿÔ¹°æh(17 ELT) NIL () LA.UNDOSELECTION :D4 (F 0 FIRSTVISIBLE# F 1 LASTVISIBLE# F 2 TOCSTATE) PQ jc(4 LA.RECONSIDERRANGE) NIL () LA.VERIFY.SELECTION :D4 (P 10 I P 4 SEL P 3 %#OFMESSAGES P 2 MESSAGES P 1 LAST# P 0 FIRST# I 0 MAILFOLDER) Æ@È@È@É@ÈHIñ²EKk2 NMó³.JN Ê jð³N_¿OµOh__¿NkÔ^°ÛOh_°òO\´voL°kKk OOó³2JO Ê jð³HOñ•oH‹OdIñ›¿oI ¿OkÔ_°ÍHkð”Ikð³(JH Ê jð–oH°JI Ê jð´oI h(194 HELP 179 ELT 161 ELT 137 HELP 104 ELT 34 ELT) NIL ( 190 "Last not selected" 171 "First not selected" 133 "Last is too low" 120 "First is too high" 83 "First > Last, but these msgs selected") LAB.PROMPTPRINT :D4 (P 6 X P 5 I P 3 WINDOW P 2 MAILFOLDER P 1 *PRINT-BASE* P 0 FOLDER&ARGS) Cel kaJÉ*[²HlMdLó›¿Nið¤JkÏJa^dið•¿K ƒK ¿MkÔ]°Û(58 PRIN3 53 CLEARW) (10 MAILFOLDER) () \LAFITE.MAYBE.CLEAR.PROMPT :D4 (I 0 MAILFOLDER) @Êjð³@É* @jÏ¿jdðhðh(13 CLEARW) NIL () PRINTMESSAGESUMMARY :D4 (P 4 MSG# P 3 EXTENT P 2 THERE P 1 HERE P 0 FROMSTR I 2 WINDOW I 1 MAILFOLDER I 0 MSGDESCRIPTOR) 2P@Êjð•@A ¿j@A BBj @A AÈAÈl @È\ñ“l°ldLñ’lˆnèLñ‘k€jÖØB oLBAÈB @Éµ`B AÈB @Ê0jð¨@Ê@jðhðƒ@ ²oB ¿@Éµ@A ‡@É µ`XB hB YAÈZñ—IJÙB ¿AÈB @Éµ`B oB ¿o@ÉB¿oB AÈhB Yýñ²AIÍ¿AÉ[I¿BgK¿@Ê jð¨A@g¿@Êjð¨A@Bgh(302 LA.SHOW.DELETION 285 LA.SHOW.SELECTION 269 PUTWINDOWPROP 242 DSPXPOSITION 234 PRIN1 225 PRINTNUM 213 PRIN1 205 PRIN1 193 DSPXPOSITION 185 DSPBACKUP 171 DSPXPOSITION 166 PRIN1 152 LAFITE.FETCH.TO.FIELD 141 PRIN1 131 LA.MSGFROMMEP 111 DSPXPOSITION 104 PRIN1 92 DSPXPOSITION 85 PRINTNUM 76 DSPXPOSITION 35 LA.SHOW.MARK 30 POSITION 25 MOVETO 21 MESSAGE#.TO.YPOS 14 LAFITE.PARSE.MSG.FOR.TOC) (299 REPLACE 282 REPLACE 265 EXTENT 201 UNSUPPLIEDFIELDSTR 161 UNSUPPLIEDFIELDSTR 100 UNSUPPLIEDFIELDSTR) ( 230 " chars]" 218 (FIX 1) 209 " [" 137 "To: " 80 (FIX 1)) FIRSTVISIBLEMESSAGE :D4 (I 1 REGION I 0 MAILFOLDER) 0@É Ad¥@É$ HHkÙØ@ÈØÙ@ÈÛkHñ¡Hk(11 DSPCLIPPINGREGION) NIL () LASTVISIBLEMESSAGE :D4 (I 1 REGION I 0 MAILFOLDER) +@È@É Ad¥@É$ @ÈÙÙ@ÈkÙØ@ÈÛHdIñI(14 DSPCLIPPINGREGION) NIL () LAB.DISPLAYLINES :D4 (P 3 MESSAGES P 2 WINDOW P 1 MSG# I 2 LAST# I 1 FIRST# I 0 MAILFOLDER) $BA@É$@ÉIHó³KI @J¿IkÔY°íh(25 PRINTMESSAGESUMMARY 20 ELT) NIL () LAB.EXPOSEMESSAGE :D4 (P 2 CLIPREGION P 1 YPOS P 0 WINDOW I 1 MSGDESCRIPTOR I 0 MAILFOLDER) >@É$A@ hH ZIñ¯JJkÙØIýñ´HjJJlÛjIÙØØh(58 SCROLLBYREPAINTFN 15 DSPCLIPPINGREGION 7 MESSAGE#.TO.YPOS) NIL () UNSELECTALLMESSAGES :D4 (P 2 MESSAGES P 1 N I 0 MAILFOLDER) .@È@È@ÉIHó³@Id¿@JI g¿IkÔY°äh(35 LA.SHOW.SELECTION 29 ELT 22 LA.DESELECTRANGE) (32 ERASE) () SELECTMESSAGE :D4 (P 0 N I 1 MAILFOLDER I 0 MSGDESCRIPTOR) @ÈAHdiA@gh(20 LA.SHOW.SELECTION 12 LA.SELECTRANGE) (17 REPLACE) () MARKMESSAGE :D4 (I 2 MARK I 1 MAILFOLDER I 0 MSGDESCRIPTOR) i`›A@ÉlØB¿@BÏ@B`ð§B`ð¡k€jHIÏ ¿Ijðhð@lÏQAkÏ ¿kjðhðAÉ$ •@A @ÈAÉ6I”IHñ´AH6h(80 LA.SHOW.MARK 74 OPENWP 14 CHANGEFLAGINFOLDER) (31 HEARDMARK 25 UNSEENMARK 2 LAFITEIMMEDIATECHANGESFLG) () CHANGEFLAGINFOLDERA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 0 STREAM I 0 SI::*CLEANUP-FORMS* F 1 MAILFOLDER F 2 PTR F 3 FLAG) !QÉ hgQg HR HS h(29 BOUT 24 SETFILEPTR 16 \LAFITE.OPEN.FOLDER 9 OBTAIN.MONITORLOCK) (13 OUTPUT 6 WITH.MONITOR) () CHANGEFLAGINFOLDER :D4 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 2 FLAG I 1 PTR I 0 MAILFOLDER) g ¿ (18 CL:VALUES-LIST 14 SI::MONITOR-UNWIND 11 \MVLIST 8 CHANGEFLAGINFOLDERA0001) (5 SI::MONITOR-UNWIND) () LA.SHOW.MARK :D4 (P 2 MARK P 1 YPOS P 0 WINDOW I 1 MAILFOLDER I 0 MSGDESCRIPTOR) 0AÉ$@A @ÊAHIgj Jl ð`IH¿HJ h(44 BOUT 38 MOVETO 25 LA.BLT.MARK.BOX 7 MESSAGE#.TO.YPOS) (33 BROWSERMARKXPOSITION 20 REPLACE) () LA.INVERT.MARK.BOX :D4 (I 1 MSG# I 0 MAILFOLDER) @dÉ$@ÉA @ gnÿÿ (24 LA.BLT.MARK.BOX 14 MESSAGE#.TO.YPOS 10 ELT) (17 INVERT) () LA.BLT.MARK.BOX :D4 (I 4 TEXTURE I 3 OPERATION I 2 YPOS I 1 WINDOW I 0 MAILFOLDER) !hddA`B@ÈÙ@È`Ù@ÈgCD (30 BKBITBLT) (24 TEXTURE 17 BROWSERMARKXPOSITION 6 BROWSERMARKXPOSITION) () LA.SHOW.DELETION :D4 (I 3 OPERATION I 2 WINDOW I 1 MSGDESCRIPTOR I 0 MAILFOLDER) 'hjdB`A@ @ÈâØ`âÙh`gCnÿÿ (36 BKBITBLT 11 MESSAGE#.TO.YPOS) (28 TEXTURE 25 LAFITEDELETEDLINEHEIGHT 19 LAFITEDELETEDLINEHEIGHT 6 BROWSERMARKXPOSITION) () LA.SHOW.SELECTION :D4 (I 2 OPERATION I 1 MSGDESCRIPTOR I 0 MAILFOLDER) "`jd@É$jA@ @ÈâlÙØhdgB (31 BKBITBLT 13 MESSAGE#.TO.YPOS) (26 INPUT 2 LA.SELECTION.BITMAP) () SEENMESSAGE :D4 (P 0 OLDMARK I 1 MAILFOLDER I 0 MSGDESCRIPTOR) _@Ê@Ê jð¬H`ð¦H`ð´D@kÏ ¿kjðhð@lÏQAkÏ ¿kjðhð`œA@ÉlØlS¿H`ð¦H`ð´ @A`(92 MARKMESSAGE 70 CHANGEFLAGINFOLDER) (89 SEENMARK 81 HEARDMARK 75 UNSEENMARK 57 LAFITEIMMEDIATECHANGESFLG 23 HEARDMARK 17 UNSEENMARK) () DELETEMESSAGE :D4 (I 1 MAILFOLDER I 0 MSGDESCRIPTOR) E`œA@ÉlØlD¿@kÏ¿kjðhð@lÏQAkÏ ¿kjðhðAkÏ0¿kjðhðA@AÉ$g(66 LA.SHOW.DELETION 15 CHANGEFLAGINFOLDER) (63 REPLACE 2 LAFITEIMMEDIATECHANGESFLG) () UNDELETEMESSAGE :D4 (P 0 WINDOW I 1 MAILFOLDER I 0 MSGDESCRIPTOR) EAÉ$`œA@ÉlØlU¿@jÏ¿jdðhð@lÏQAkÏ ¿kjðhðA@Hg@AHh(65 PRINTMESSAGESUMMARY 59 LA.SHOW.DELETION 21 CHANGEFLAGINFOLDER) (56 ERASE 8 LAFITEIMMEDIATECHANGESFLG) () LAB.ICONFN :D4 (P 1 MAILFOLDER P 0 BROWSERREGION I 1 OLDICON I 0 WINDOW) h@g µ\@ É@g `µ``lllXl3hhIµoh`gð›dÉ` °íHHihg (101 TITLEDICONW 84 LA.SHORTFILENAME 24 GETWINDOWUSERPROP 15 \INSUREWINDOW 9 WINDOWP 6 GETWINDOWUSERPROP) (97 FILE 81 LAFITEMAIL.EXT 72 ASK 69 LAFITE.BROWSER.ICON.PREFERENCE 58 MSGFOLDERTEMPLATE 38 MSGFOLDERMASK 35 MSGFOLDERICON 30 MSGFOLDERTEMPLATE 21 MAILFOLDER 3 ICONWINDOW) ( 65 "??") \LAFITE.UPDATE :D4 (P 0 HOW? I 3 MENU I 2 ITEM I 1 MAILFOLDER I 0 WINDOW) uA HµAio Xd²Z@dždiðª3µ g@hAd´diðª3µ gAhhBdždiðª3µ gBhCd´diðª3µ gChhg (114 \LAFITE.PROCESS 22 MENU 18 LAB.PROMPTPRINT 3 LAB.CHOOSE.UPDATE.MENU) (111 LAFITEUPDATE 97 QUOTE 78 QUOTE 59 QUOTE 40 QUOTE) ( 15 "No changes since the last Update") \LAFITE.EXPUNGE.PROCA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 MAILFOLDER F 1 ITEM F 2 CLOSEFLG F 3 MENU F 4 WINDOW) )PQSP T Pd RšPi Pj6jP (38 LAB.DISPLAYFOLDER 28 \LAFITE.CLOSE.FOLDER 21 \LAFITE.UPDATE.CONTENTS 18 \LAFITE.COMPACT.FOLDER 13 CLEARW 9 \LAFITE.CLOSE.DISPLAYWINDOWS 5 \LAFITE.START.UPDATE) NIL () \LAFITE.EXPUNGE.PROC :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 4 MENU I 3 ITEM I 2 CLOSEFLG I 1 MAILFOLDER I 0 WINDOW F 2 LISPXHIST) Rg ¿ @AB(26 \LAFITE.FINISH.UPDATE 19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 \LAFITE.EXPUNGE.PROCA0001) (6 SI::RESETUNWIND) () \LAFITE.UPDATE.PROCA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 MAILFOLDER F 1 ITEM F 2 MENU F 3 CLOSEFLG) :PQRPÊ jð¦P ¿i€h§PÈPÈ ð§PdÈ ˆPio¿S´Pi (55 \LAFITE.CLOSE.FOLDER 46 LAB.PROMPTPRINT 36 \LAFITE.UPDATE.CONTENTS 16 \LAFITE.UPDATE.FOLDER 5 \LAFITE.START.UPDATE) NIL ( 43 "No changes since last update") \LAFITE.UPDATE.PROC :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 4 MENU I 3 ITEM I 2 CLOSEFLG I 1 MAILFOLDER I 0 WINDOW F 2 LISPXHIST) Rg ¿ @AB(26 \LAFITE.FINISH.UPDATE 19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 \LAFITE.UPDATE.PROCA0001) (6 SI::RESETUNWIND) () \LAFITE.HARDCOPYONLY.PROCA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 MAILFOLDER F 1 MENU F 2 ITEM) %Rµ gPÉ&c Q PÉ hiP PQ (34 \LAFITE.DO.PENDING.HARDCOPY 29 \LAFITE.MAYBE.CLEAR.PROMPT 25 OBTAIN.MONITORLOCK 17 LA.RESETSHADE 13 LA.MENU.ITEM) (5 \LAFITE.UPDATE) () \LAFITE.HARDCOPYONLY.PROC :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 4 MENU I 3 ITEM I 2 CLOSEFLG I 1 MAILFOLDER I 0 WINDOW F 2 LISPXHIST) Rg ¿ @AB(26 \LAFITE.FINISH.UPDATE 19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 \LAFITE.HARDCOPYONLY.PROCA0001) (6 SI::RESETUNWIND) () LAB.CHOOSE.UPDATE.MENU :D4 (L (1 CLOSEFLG 0 MAILFOLDER)) ?A”`ƒ`@dÉ>“¿HÊ jð£H@dÊ0jð¥¿HÈ@È ð¥HhNIL (9 LAFITEUPDATEMENUS 4 LAFITEUPDATEMENUS) () \LAFITE.START.UPDATEA0003 :D4 (L (0 MAILFOLDER)) @jÏ@¿jdðhðNIL NIL () \LAFITE.START.UPDATE :D4 (P 0 TEXTSTREAM I 2 MENU I 1 ITEM I 0 MAILFOLDER F 1 SI::*RESETFORMS*) qAµ g@É&b B @É hi@kÏ@¿kjðhðg@hhdQc@ @ @É>H´,@io¿@H@É<¿@dh<¿h>¿gB Bjh(109 SHADEITEM 104 LA.MENU.ITEM 86 \LAFITE.TRANSMIT.HARDCOPY 77 LAB.PROMPTPRINT 59 \LAFITE.CLOSE.OTHER.FOLDERS 55 \LAFITE.MAYBE.CLEAR.PROMPT 25 OBTAIN.MONITORLOCK 17 LA.RESETSHADE 13 LA.MENU.ITEM) (100 \LAFITE.HARDCOPY 39 \LAFITE.START.UPDATEA0003 5 \LAFITE.UPDATE) ( 74 "Hardcopying... ") \LAFITE.FINISH.UPDATEA0001A0002 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 MAILFOLDER F 1 WINDOW F 2 DONTCLOSE) =`hgPi QP cR¤d ¿PÉ0˜PÉ0jØjð´PÉg jð´P (58 DELETEMAILFOLDER 50 GETFILEINFO 27 CLOSEW 19 LAB.FLUSHWINDOW 14 \LAFITE.CLOSE.FOLDER 9 OBTAIN.MONITORLOCK) (47 LENGTH 6 WITH.MONITOR 2 \LAFITE.BROWSELOCK) () \LAFITE.FINISH.UPDATEA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 SI::*CLEANUP-FORMS* F 2 MAILFOLDER F 3 WINDOW F 4 CLOSEFLG F 5 DONTCLOSE) WRÉ hgTdgð²¿ g ¿ gð´*R ¿Ri ¿Sgg¿Sgg¿UµS (84 SHRINKW 76 WINDOWDELPROP 65 WINDOWADDPROP 54 \LAFITE.CLOSE.FOLDER 48 \LAFITE.CLOSE.DISPLAYWINDOWS 37 CL:VALUES-LIST 33 SI::MONITOR-UNWIND 30 \MVLIST 27 \LAFITE.FINISH.UPDATEA0001A0002 9 OBTAIN.MONITORLOCK) (73 LAB.SHRINKFN 70 SHRINKFN 62 LAB.EXPANDFN 59 EXPANDFN 41 SHRINK 24 SI::MONITOR-UNWIND 14 CLOSE 6 WITH.MONITOR) () \LAFITE.FINISH.UPDATE :D4 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 3 DONTCLOSE I 2 CLOSEFLG I 1 MAILFOLDER I 0 WINDOW) g ¿ `´(27 \LAFITE.WRITE.PROFILE 18 CL:VALUES-LIST 14 SI::MONITOR-UNWIND 11 \MVLIST 8 \LAFITE.FINISH.UPDATEA0001) (22 \LAFITEPROFILECHANGED 5 SI::MONITOR-UNWIND) () \LAFITE.CLOSE.OTHER.FOLDERSA0001A0002 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 FOLDER) PÉ id´PdÉ$ hð (21 \LAFITE.CLOSE.FOLDER 16 OPENWP 7 OBTAIN.MONITORLOCK) NIL () \LAFITE.CLOSE.OTHER.FOLDERSA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 3 SI::*RESETFORMS* P 2 LISPXHIST P 1 FOLDER I 0 SI::*CLEANUP-FORMS* F 4 THISFOLDER F 5 LISPXHIST) <`hg`HµhYTð³IÉ²Ug ¿ HX°Ø(52 CL:VALUES-LIST 48 SI::RESETUNWIND 45 \MVLIST 42 \LAFITE.CLOSE.OTHER.FOLDERSA0001A0002 9 OBTAIN.MONITORLOCK) (39 SI::RESETUNWIND 12 \ACTIVELAFITEFOLDERS 6 WITH.MONITOR 2 \LAFITE.MAINLOCK) () \LAFITE.CLOSE.OTHER.FOLDERS :D4 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 THISFOLDER) g ¿ (18 CL:VALUES-LIST 14 SI::MONITOR-UNWIND 11 \MVLIST 8 \LAFITE.CLOSE.OTHER.FOLDERSA0001) (5 SI::MONITOR-UNWIND) () LAB.FLUSHWINDOW :D4 (I 1 MAILFOLDER I 0 WINDOW) YA @ggAddddddh*¿h&¿h$¿h(¿h2¿jÏ¿jdðhð@ghA` @ µ@g (86 OPENWP 83 GETWINDOWUSERPROP 74 OPENWP 67 DREMOVE 60 PUTWINDOWPROP 13 WINDOWDELPROP 3 \LAFITE.CLOSE.DISPLAYWINDOWS) (80 ICONWINDOW 70 \ACTIVELAFITEFOLDERS 64 \ACTIVELAFITEFOLDERS 56 MAILFOLDER 10 LAB.CLOSEFN 7 CLOSEFN) () LAB.APPENDMESSAGES :D4 (P 7 WINDOW P 6 HEIGHT P 5 EXTENT P 4 REGION P 3 MSGDESCRIPTOR P 1 FIRSTMSG# P 0 LASTMSG# I 1 NEWMESSAGEDESCRIPTORS I 0 FOLDERDATA) ™@È!HkØY@dg 0A°dKHkÔXÍ¿K@ µë@HÍ@dÉAIHh@É$ @ÉH@ÈÚMN¿M@É NÙ¿@É$_gM¿O ²@I@L ºdJñ¡¿J@L ‡@É6£@I6h(140 LAB.DISPLAYLINES 137 LASTVISIBLEMESSAGE 125 FIRSTVISIBLEMESSAGE 116 OPENWP 110 PUTWINDOWPROP 71 DSPCLIPPINGREGION 62 \LAFITE.ADDMESSAGES.TO.ARRAY 43 LAFITE.PARSE.MSG.FOR.TOC 20 GETEOFPTR 17 \LAFITE.OPEN.FOLDER) (106 EXTENT 14 INPUT) () \LAFITE.COMPACT.FOLDER :D4 (P 6 MSG# P 4 MSG P 3 FOLDERSTREAM P 2 LASTGOODMSG# P 1 LASTMSG# P 0 MESSAGES I 0 MAILFOLDER) d@É@Èj#IkNMó³/HN \Êjð²"LÊPjð³L@Kµ dg [¿NZkÔ^°ÑJIð¯@Kµ dg J¿@jÏ0¿jdðhðJ(84 \LAFITE.COMPACT.FOLDER1 80 \LAFITE.OPEN.FOLDER 56 WRITEFOLDERMARKBYTES 52 \LAFITE.OPEN.FOLDER 24 ELT) (77 BOTH 49 BOTH) () \LAFITE.COMPACT.FOLDER1 :D4 (P 18 I P 11 MSGDESCRIPTOR P 10 GOODMSGSPTR P 9 END P 8 START P 7 COMPACTLENGTH P 6 MESSAGELENGTH P 5 SCRATCHFILE P 4 NEXTFILEPTR P 3 LASTSELECTED P 2 FIRSTSELECTED P 1 OLDLASTMSG# P 0 MESSAGES I 2 LASTGOODMSG# I 1 FOLDERSTREAM I 0 MAILFOLDER) é@É@È@È@È´@o KBóJBó’hZ…@JB»Bjð‘jHB _ÉOÉØ\_IBkØjO Oó³"HO _Êjð™O"OÉÔ_"¿O kÔ_ °ÝO"_djð’±gggO½IBkØO$O"ó’±ÀHO$ _Êjð¢±¦`–O@ ¿M ¿OÉ¾OÉOÈØ_¿OÉOÉØ_¿OÈlð³OOÙlØ¾OlÍ¿ON¿Mj ¿NM ¿lM ¿OhM¿Ml ¿AMOO¿OBkÔbÍ¿OÊ jð¦J¢BZ€B»OL¿LNÔ¼HBO¿O$kÔ_$±ÿ?AO ¿MAjmÿ¿M ½LA Ùjð³oLgA h ¿@BÍ@JµkÍ@KµjÍIBkØ_¿_¿OOó¯HOh¿OkÔ_°îAL @L0AgL@i `gð”@ ¿Md“ h(485 DELFILE 478 VERIFYMAILFOLDER 466 \LAFITE.CLOSE.FOLDER 461 SETFILEINFO 449 SETFILEPTR 435 SETA 393 HELP 386 GETFILEPTR 369 GETFILEPTR 363 CLOSEF 358 COPYBYTES 349 SETFILEPTR 332 SETA 289 COPYBYTES 279 BOUT 272 WRITEFOLDERMARKBYTES 264 LA.PRINTCOUNT 257 LA.PRINTCOUNT 251 POSITION 185 LA.PRINTSTAMP 180 \LAFITE.VERIFYMSG 159 ELT 136 LA.OPENTEMPFILE 84 ELT 51 ELT 39 LAB.REV.FIND.SELECTED.MSG 22 LAB.PROMPTPRINT) (472 ALL 469 LAFITEVERIFYFLG 457 LENGTH 382 NEQ 173 LAFITEVERIFYFLG 131 NEW 128 BOTH 125 SCRATCH) ( 378 "Miscalculation in COMPACTMAILFOLDER" 19 "Compacting folder... ") \LAFITE.UPDATE.FOLDER :D4 (P 4 MSG# P 2 MSG P 1 OUTSTREAM P 0 MESSAGES I 0 MAILFOLDER) T@É!@o @ÈkLKó³&HL ZÊPjð³J@Iµ dg Y¿LkÔ\°Ú@ @I”oƒo (81 LAB.PROMPTPRINT 66 \LAFITE.CLOSE.FOLDER 54 WRITEFOLDERMARKBYTES 50 \LAFITE.OPEN.FOLDER 30 ELT 13 LAB.PROMPTPRINT) (47 OUTPUT) ( 78 "nothing changed. " 73 " done. " 10 "Writing out changes...") \LAFITE.UPDATE.CONTENTSA0001 :D4 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 MAILFOLDER F 3 LASTUNCHANGEDMESSAGE# F 4 SI::NLSETQ-VALUE) i@RS hcg(9 \LAFITE.UPDATE.CONTENTS1) (16 :NORMAL) () \LAFITE.UPDATE.CONTENTS :D4 (P 3 *CONDITION-HANDLER-BINDINGS* P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 1 LASTUNCHANGEDMESSAGE# I 0 MAILFOLDER F 4 *PROCEED-CASES* F 5 *CONDITION-HANDLER-BINDINGS*) <`TioUI gð´H•@o„@o ¿@jÏ ¿jdðhð(45 LAB.PROMPTPRINT 21 \LAFITE.UPDATE.CONTENTSA0001) (25 :NORMAL 5 SI::NLSETQ-PROCEED-CASE) ( 42 " failed." 36 " done." 12 (CL:ERROR . SI::NLSETQHANDLER)) \LAFITE.UPDATE.CONTENTS1A0001A0002 :D4 (I 1 MAILFOLDER I 0 STREAM F 0 RESETSTATE) @ bP´ AjÍ @ (16 DELFILE 3 CLOSEF) NIL () \LAFITE.UPDATE.CONTENTS1A0001 :D4 (NAME SI::*UNWIND-PROTECT* P 15 MSG# P 6 MSG P 5 TOCSTREAM P 4 FIRSTMSG# P 3 TOCSTART P 2 MESSAGES P 1 LASTMSG# P 0 TOCFILE I 0 SI::*CLEANUP-FORMS* F 16 MAILFOLDER F 17 LASTUNCHANGEDMESSAGE# F 18 SI::*RESETFORMS*) žW É W ÈW Él ¤ Ijñ¢±iW o ¿gHggho ]W hhdW$c$¿Mgg¿W"W È _¿dOñ’¿Oc"¿M jð•jc"¿°\W"djð²¿Ml ¿M áM Ø`ð²AW"kOOó³3JO ^Ê`jð³MKlØ ¿NM ¿NjÏ`¿KNÈÔ»OkÔ_°ÌMK ¿IW"kØOOó³JO M ¿OkÔ_°êMgM ¿Mj ¿Ml² ¿Ml* ¿M`ã ¿M`lÿå ¿MW É0_¿_Oãã_¿_Oã ¿OOlÿå ¿OOnÿÿå_¿_Oã ¿OOlÿå ¿MIã ¿MIlÿå °H XžW o ¿H ¿W IÍ I(404 DELFILE 399 LAB.PROMPTPRINT 388 INFILEP 382 \BOUT 373 \BOUT 366 \BOUT 355 \BOUT 335 \BOUT 324 \BOUT 298 \BOUT 287 \BOUT 278 \BOUT 271 \BOUT 264 SETFILEPTR 258 SETFILEINFO 255 GETFILEPTR 237 WRITETOCENTRY 233 ELT 211 SETFILEPTR 184 WRITETOCMARKBYTES 178 SETFILEPTR 162 ELT 130 SETFILEPTR 107 GETEOFPTR 82 WHENCLOSE 55 OPENSTREAM 35 LAB.PROMPTPRINT 6 TOCFILENAME) (292 LAFITEVERSION# 283 LAFITEVERSION# 251 LENGTH 140 LAFITEVERSION# 79 NO 76 CLOSEALL 46 OLD/NEW 43 BOTH 39 \LAFITE.UPDATE.CONTENTS1A0001A0002) ( 396 "Deleting table of contents..." 51 ((TYPE BINARY)) 32 "Writing table of contents...") \LAFITE.UPDATE.CONTENTS1 :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 LASTUNCHANGEDMESSAGE# I 0 MAILFOLDER F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 \LAFITE.UPDATE.CONTENTS1A0001) (6 SI::RESETUNWIND) () WRITETOCENTRY :D4 (P 3 NC P 2 DAT P 1 MESSAGELENGTH P 0 LENGTH I 1 STREAM I 0 MSG) £l@ÉBInÿÿñ²AIãã ¿AInÿÿå½\Mã ¿LMŽAj ¿AIã ¿AIlÿå ¿A@È @A @ÉZ [lð’J°JklµJlKÙl A HA@É ÔXdA@É ÔXdA@É ÔX@HÍ@jÏ`¿jdðhðh(142 LA.PRINTSHORTSTRING 132 LA.PRINTSHORTSTRING 122 LA.PRINTSHORTSTRING 114 PRIN3 110 CONCAT 107 ALLOCSTRING 95 SUBSTRING 80 NCHARS 73 WRITETOCMARKBYTES 68 BOUT 60 \BOUT 51 \BOUT 44 BOUT 35 \BOUT 21 BOUT) NIL () WRITETOCMARKBYTES :D4 (I 1 STREAM I 0 MSG) A@Ê A@Ê (15 BOUT 7 BOUT) NIL () WRITEFOLDERMARKBYTES :D4 (I 2 OUTSTREAM I 1 MAILFOLDER I 0 MSG) tA²>`•@A ¿@Êjð³!B@É ¿B £¿@ÉB ¿@jÏ¿B@ÉlØ ¿B@Êjð¢lDlU B@Ê jð¢lSlU B@Ê @jÏP¿jdðhð(102 BOUT 94 BOUT 78 BOUT 61 SETFILEPTR 44 LA.PRINTCOUNT 36 HELP 32 LA.READSTAMP 27 SETFILEPTR 11 \LAFITE.VERIFYMSG) (5 LAFITEVERIFYFLG) () LA.OPENTEMPFILE :D4 (P 0 STREAM I 3 LENGTH I 2 RECOG I 1 ACCESS I 0 EXTENSION) Kggggg@ AµgBµghC´gChh Hd²ggnÿÿH H(71 LINELENGTH 64 WHENCLOSE 48 OPENSTREAM 19 PACKFILENAME) (61 NO 58 CLOSEALL 38 LENGTH 31 NEW 25 OUTPUT 14 EXTENSION 11 LAFITETEMPORARY 8 NAME 5 SCRATCH 2 HOST) () \LAFITE.DISPLAYA0001A0002 :D4 (NAME SI::*UNWIND-PROTECT* P 1 W P 0 MSGDESCRIPTOR I 0 SI::*CLEANUP-FORMS* F 2 MAILFOLDER F 3 WINDOW F 4 KEY) BRÉ hgR R µ.SR HšRHTgðRioRÉ. Yd“ h(62 TOTOPW 56 WINDOWP 49 LAB.PROMPTPRINT 39 \LAFITE.DO.DISPLAY 24 SELECTMESSAGETODISPLAY 17 LAB.ASSURE.SELECTIONS 13 \LAFITE.MAYBE.CLEAR.PROMPT 9 OBTAIN.MONITORLOCK) (35 MIDDLE 6 WITH.MONITOR) ( 46 "No more messages.") \LAFITE.DISPLAYA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 SI::*CLEANUP-FORMS* F 2 ITEM F 3 MENU) RS g ¿ (23 CL:VALUES-LIST 19 SI::MONITOR-UNWIND 16 \MVLIST 13 \LAFITE.DISPLAYA0001A0002 4 LA.RESETSHADE) (10 SI::MONITOR-UNWIND) () \LAFITE.DISPLAY :D4 (P 2 SI::*RESETFORMS* P 1 LISPXHIST P 0 DISPLAYWINDOW I 4 KEY I 3 MENU I 2 ITEM I 1 MAILFOLDER I 0 WINDOW F 3 LISPXHIST) %Sg ¿ X ´H h(33 TOTOPW 27 WINDOWP 22 CL:VALUES-LIST 18 SI::RESETUNWIND 15 \MVLIST 12 \LAFITE.DISPLAYA0001) (9 SI::RESETUNWIND) () \LAFITE.DO.DISPLAY :D4 (P 1 DISPLAYWINDOW P 0 TEMPMSG I 2 NEWWINDOWFLG I 1 MSGDESCRIPTOR I 0 MAILFOLDER) Y @A @h4@gg XAH @Hg oAÈo@ÉoAÉo BYA@ @H@A4I(77 SEENMESSAGE 71 MESSAGEDISPLAYER 67 CONCAT 38 OPENSTREAM 30 CLOSEF 26 LA.COPY.MESSAGE.TEXT 21 OPENSTREAM 7 LAB.EXPOSEMESSAGE) (35 INPUT 18 BOTH 15 {NODIRCORE}) ( 63 " chars]" 56 " [" 49 " from " 42 "Message ") SELECTMESSAGETODISPLAY :D4 (P 5 MSGDESCRIPTOR P 4 DISPLAYED# P 3 LAST# P 2 FIRST# P 1 MESSAGES P 0 CURRENTDISPLAYEDMSG I 1 MAILFOLDER I 0 WINDOW) GAÉ4AÉAÈAÈ$JKñ‘hH–HÊ jð•IJ JKð—AHÈ IHÈ\Kð‘J‡ALkØK (68 ELT 65 LAB.FIND.SELECTED.MSG 46 \LAFITE.SELECT.NEXT 34 ELT) NIL () MESSAGEDISPLAYERA0001 :D4 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 TEXTFILE F 3 DISPLAYWINDOW F 4 PROPS F 5 SI::NLSETQ-VALUE) i@RShdT hc g(13 OPENTEXTSTREAM) (20 :NORMAL) () MESSAGEDISPLAYER :D4 (P 12 *CONDITION-HANDLER-BINDINGS* P 11 SI::*NLSETQFLAG* P 10 *PROCEED-CASES* P 9 SI::NLSETQ-VALUE P 8 FOLDER P 6 W P 5 EOF P 4 REGION P 3 DISPLAYWINDOW P 2 TEXTSTREAM P 1 PROPS P 0 CURRENTWINDOWS I 3 NEWWINDOWFLG I 2 TITLE I 1 TEXTFILE I 0 MAILFOLDER F 13 *PROCEED-CASES* F 14 *CONDITION-HANDLER-BINDINGS*) @É.g``´oRC’±ŒH [µ‚±¤`[²h¿Kgg°gH\ž`Oµi³V`l ²L`°+_É.^µ O_°Ý^ ²ôLN Éô²êh°Íd3•µùi¿h²`Oµ`!Hµh¹@IÉ.Z ²"Ih4¿Ih¿I@J µ@ Éh .hHX°Ì(51 \APPEND2 45 \INSUREWINDOW 39 DREMOVE 21 MEMB) (2 \ACTIVELAFITEFOLDERS) () \LAFITE.DELETEA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 3 MSGDESCRIPTOR P 2 $$MSGLAST P 1 $$MSG# P 0 $$MESSAGES I 0 SI::*CLEANUP-FORMS* F 4 MAILFOLDER F 5 MENU F 6 ITEM F 7 WINDOW) XTÉ hgT T µDTÉTÈkÙTÈIkÔYJñ³HI [Ê jð³íKÊjð²åKT ¿°ÝVUj¿TWUh(84 DISPLAYAFTERDELETE 76 SHADEITEM 67 DELETEMESSAGE 46 ELT 17 LAB.ASSURE.SELECTIONS 13 \LAFITE.MAYBE.CLEAR.PROMPT 9 OBTAIN.MONITORLOCK) (6 WITH.MONITOR) () \LAFITE.DELETE :D4 (P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 3 MENU I 2 ITEM I 1 MAILFOLDER I 0 WINDOW) BC` g ¿ (26 CL:VALUES-LIST 22 SI::MONITOR-UNWIND 19 \MVLIST 16 \LAFITE.DELETEA0001 7 SHADEITEM) (13 SI::MONITOR-UNWIND 4 LAFITEITEMBUSYSHADE) () DISPLAYAFTERDELETE :D4 (P 6 NEXTMSG P 5 I P 3 MESSAGES P 2 LASTMSG# P 1 CURRENT P 0 FIRST# I 2 MENU I 1 WINDOW I 0 MAILFOLDER) É`´‚±Á@È1H@Èð³`gð´‚±§@H @É4Y–HIÈð³`dgð³ædgð³ßh`dgð¥dgð—¿@H °[¿H@ÈZðhð´_@É[HkØ Êjðhðhð´JJHkØMLó³-KM ^Ê jð’i°NÊ0jð¨NÊ@jðhðƒN ´ MkÔ]°Óh´A@gB B(198 \LAFITE.DISPLAY 194 LA.MENU.ITEM 173 LA.MSGFROMMEP 143 ELT 115 ELT 92 \LAFITE.SELECT.NEXT 39 \LAFITE.SELECT.NEXT) (190 \LAFITE.DISPLAY 84 MULTIPLE 78 ALWAYS 74 LAFITEDISPLAYAFTERDELETEFLG 66 MULTIPLE 59 ALWAYS 55 LAFITEDISPLAYAFTERDELETEFLG 27 MULTIPLE 24 LAFITEDISPLAYAFTERDELETEFLG 2 LAFITEDISPLAYAFTERDELETEFLG) () \LAFITE.SELECT.NEXT :D4 (P 3 MSG P 2 MESSAGES P 1 N I 1 AFTER# I 0 MAILFOLDER) L@ÈAkØ@ÉIHó³:JI [Êjð²'@ ¿@K ¿@Kg¿KkÏ ¿@dIÍ¿IÍKIkÔY°Æh(48 LA.SHOW.SELECTION 39 LAB.EXPOSEMESSAGE 33 UNSELECTALLMESSAGES 21 ELT) (45 REPLACE) () \LAFITE.UNDELETEA0001A0002 :D4 (NAME SI::*UNWIND-PROTECT* P 3 MSGDESCRIPTOR P 2 $$MSGLAST P 1 $$MSG# P 0 $$MESSAGES I 0 SI::*CLEANUP-FORMS* F 4 MAILFOLDER) JTÉ hgT T µ6TÉTÈkÙTÈIkÔYJñ³HI [Ê jð³íKÊjð³åKT ¿°Ýh(67 UNDELETEMESSAGE 46 ELT 17 LAB.ASSURE.SELECTIONS 13 \LAFITE.MAYBE.CLEAR.PROMPT 9 OBTAIN.MONITORLOCK) (6 WITH.MONITOR) () \LAFITE.UNDELETEA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 1 SI::*RESETFORMS* P 0 SI::*LOCKED-MONITOR* I 0 SI::*CLEANUP-FORMS* F 2 ITEM F 3 MENU) RS g ¿ (23 CL:VALUES-LIST 19 SI::MONITOR-UNWIND 16 \MVLIST 13 \LAFITE.UNDELETEA0001A0002 4 LA.RESETSHADE) (10 SI::MONITOR-UNWIND) () \LAFITE.UNDELETE :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 3 MENU I 2 ITEM I 1 MAILFOLDER I 0 WINDOW F 2 LISPXHIST) Rg ¿ (19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 \LAFITE.UNDELETEA0001) (6 SI::RESETUNWIND) () \LAFITE.MOVETOA0001 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 OUTPUTFILE) `hgP (13 \LAFITE.GETMAILFOLDER 9 OBTAIN.MONITORLOCK) (6 WITH.MONITOR 2 \LAFITE.BROWSELOCK) () \LAFITE.MOVETO :D4 (P 8 SI::*RESETFORMS* P 7 SI::*LOCKED-MONITOR* P 6 MIDDLESELECTED P 5 OLDFILEP P 4 SHORTOUTPUT P 3 DESTINATIONFOLDER P 2 OUTPUTFILE P 1 TOFILE P 0 BROWSERPROMPTWINDOW I 4 KEY I 3 MENU I 2 ITEM I 1 MAILFOLDER I 0 WINDOW) p AÉ*aH A ³4Dgð›AÉ2—i¾AÉ2ÉŠ`µ Ydd´gðœH YµH hi½I ` ZBC`AÉJð²AioIo ¿BCjhJ` \`µi°dgð’¿N‡gð”Nhð³&oLM”oJ ”oƒoiH²³ g ¿ [´‚±ÿlg@dždiðª3µ g@hAdždiðª3µ gAhKdždiðª3µ gKhBdždiðª3µ gBhCdždiðª3µ gChLdždiðª3µ gLhMd´diðª3µ gMhhg ¿±þÖ(362 \LAFITE.PROCESS 209 CL:VALUES-LIST 205 SI::MONITOR-UNWIND 202 \MVLIST 199 \LAFITE.MOVETOA0001 188 MOUSECONFIRM 183 CONCAT 170 INFILEP 126 LA.SHORTFILENAME 117 SHADEITEM 110 LAB.PROMPTPRINT 88 SHADEITEM 79 LA.LONGFILENAME 73 U-CASE 65 CLEARW 58 PROMPTFORFILENAME 44 MENU 41 MAKELAFITEMAILFOLDERSMENU 13 LAB.ASSURE.SELECTIONS 9 CLEARW) (359 LAFITEMOVE 343 QUOTE 324 QUOTE 306 QUOTE 288 QUOTE 270 QUOTE 252 QUOTE 234 QUOTE 220 \LAFITE.MOVETO.PROC 196 SI::MONITOR-UNWIND 147 MIDDLE 139 LEFT 130 LAFITEMOVETOCONFIRMFLG 123 LAFITEMAIL.EXT 85 LAFITEITEMBUSYSHADE 76 LAFITEMAIL.EXT 52 %##ANOTHERFILE## 36 LAFITEFOLDERSMENU 19 MIDDLE) ( 180 " [New File]." 175 " [Old File]." 165 "" 158 "Click LEFT to confirm move to " 106 ", can't move to there." 101 "This IS ") \LAFITE.MOVETO.PROCA0001 :D4 (NAME SI::*UNWIND-PROTECT* P 19 MARK P 18 NEWLENGTH P 17 NEWMSGDESCRIPTOR P 16 MSGDESCRIPTOR P 12 $$MSGLAST P 11 $$MSG# P 10 $$MESSAGES P 2 MSGDESCRIPTORS P 1 OUTPUTSTREAM P 0 INPUTFILE I 0 SI::*CLEANUP-FORMS* F 20 MAILFOLDER F 21 DESTINATIONFOLDER F 22 SHORTOUTPUT F 23 ITEM F 24 MENU F 25 WINDOW F 26 OLDFILEP) ëW.W0 W(É hiW*É id³%W(ioW,o ¿W*É hi¿W(i ¿W(g W*W4W(Y¡hW(É2W*ð³W(W*2¿W2gW(É,oW,¿W(ÉW(ÈkÙW(ÈsOkÔ_Oñ’±0OO _ Ê jð³å`—O W( ¿Imÿ ¿O ÉO ÈÙlØ_$¿`I »dK¿O Ê jðhð¼dL‘k€jÏ ¿dO$¿O Ê_&¿dO&Ï¿dlÍ¿O Êjðhð½dM‘k€jÏ¿O É¾dN¿O É _¿dO ¿O É_¿dO¿O É_¿dO¿_"¿I ¿O$I ¿lI ¿IlU ¿IO Ê jð¢lSlU ¿IO& ¿Il ¿W(IO ¿O W(`¿O W( ¿O"_¿OµOh__¿±þÔOh_¿±þÉOZW*É$´‚±þƒW*Êjð’±þwW*J ¿±þm(485 LAB.APPENDMESSAGES 421 DELETEMESSAGE 413 MARKMESSAGE 402 LA.COPY.MESSAGE.TEXT 393 BOUT 386 BOUT 379 BOUT 361 BOUT 354 LA.PRINTCOUNT 347 LA.PRINTCOUNT 340 LA.PRINTSTAMP 211 GETFILEPTR 187 SETFILEPTR 180 \LAFITE.VERIFYMSG 160 ELT 122 PUTWINDOWPROP 119 CONCAT 81 \LAFITE.OPEN.DESTINATION 72 \LAFITE.OPEN.FOLDER 63 LAB.PROMPTPRINT 56 OBTAIN.MONITORLOCK 46 LAB.PROMPTPRINT 27 OBTAIN.MONITORLOCK 18 OBTAIN.MONITORLOCK 6 LA.RESETSHADE) (410 MOVETOMARK 206 |LAFITEMSGTYPE#| 172 LAFITEVERIFYFLG 106 TITLE 69 INPUT) ( 114 " -- Default 'Move To': " 42 " to become available..." 36 "Waiting for ") \LAFITE.MOVETO.PROC :D4 (P 1 SI::*RESETFORMS* P 0 LISPXHIST I 6 OLDFILEP I 5 SHORTOUTPUT I 4 MENU I 3 ITEM I 2 DESTINATIONFOLDER I 1 MAILFOLDER I 0 WINDOW F 2 LISPXHIST) Rg ¿ A@D(26 DISPLAYAFTERDELETE 19 CL:VALUES-LIST 15 SI::RESETUNWIND 12 \MVLIST 9 \LAFITE.MOVETO.PROCA0001) (6 SI::RESETUNWIND) () \LAFITE.OPEN.DESTINATION :D4 (P 1 OUTPUTFULLNAME P 0 OUTPUTSTREAM I 2 SOURCEFOLDER I 1 CHECKOLDFILEP I 0 DESTINATIONFOLDER) q@ÉHµT@Éµ@ÉXA˜d “hb¿Hg X@H Y@HA²:H jð²2oIoiBÉ*³@i @ g ‘H@g @É(106 \LAFITE.OPEN.FOLDER 96 OPENP 89 DELETEMAILFOLDER 85 \LAFITE.CLOSE.FOLDER 78 MOUSECONFIRM 71 CONCAT 55 GETEOFPTR 41 FULLNAME 35 \LAFITE.OPENSTREAM 23 INFILEP) (103 BOTH 93 OUTPUT 32 BOTH) ( 68 " [New File]" 63 "CLick LEFT to confirm creating ") \LAFITE.HARDCOPY :D4 (I 3 MENU I 2 ITEM I 1 FOLDERDATA I 0 WINDOW) GgAdždiðª3µ gAhBdždiðª3µ gBhCd´diðª3µ gChhg (68 \LAFITE.PROCESS) (65 MESSAGEHARDCOPIER 53 QUOTE 34 QUOTE 16 QUOTE 2 \LAFITE.HARDCOPY.PROC) () \LAFITE.HARDCOPY.PROCA0001A0002 :D4 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 6 MAILFOLDER F 7 MSGLST F 8 TEXTSTREAM F 9 LCASEFILENAME F 10 CONTINUEFLG) ÅVÉ hgV V ’±¯VÉVÈkÙVÈ3IkÔYJñ³$HI dÊ jð’¿°ë½Lµ Mh\»°àMh\¿°ØKcVÉ c`³`²W `ýñ©VWW°VÉ>cµohddg`h cVWWW`´VW`VW>VdÉ@É<H´L@io`²I `ýñ®@dÉ Ihi ¿@HI@dh<¿h>gA Aj@o (85 LAB.PROMPTPRINT 77 SHADEITEM 72 LA.MENU.ITEM 56 \LAFITE.TRANSMIT.HARDCOPY 49 \LAFITE.HARDCOPY.HEADERS 42 L-CASE 29 LENGTH 20 LAB.PROMPTPRINT) (68 \LAFITE.HARDCOPY 32 LAFITEHARDCOPY.MIN.TOC 23 LAFITEHARDCOPY.MIN.TOC) ( 82 "done." 17 "Hardcopying... ") (PRETTYCOMPRINT LAFITEBROWSECOMS) (RPAQQ LAFITEBROWSECOMS ((COMS (* ; "BROWSE") (FNS \LAFITE.BROWSE \LAFITE.SUBBROWSE \LAFITE.BROWSE.PROC \LAFITE.PREPARE.BROWSER \LAFITE.PREPARE.NEW.BROWSER LAB.LOADFOLDER LAB.DISPLAYFOLDER LAB.MAKE.INITIAL.SELECTION LAB.CREATEWINDOW LAB.COMMANDFN LAB.ASSURE.SELECTIONS)) ( COMS (* ; "Browser operations") (FNS LAB.SETUP LAB.BUTTONEVENTFN LAB.DO.UNLESS.BUSY LOADMAILFOLDER \LAFITE.GETMAILFOLDER LAB.REPAINTFN LAB.SCROLLFN LAB.RESHAPEFN LAB.CLOSEFN LAB.SHRINKFN LAB.CLOSE/SHRINK LAB.EXPANDFN)) (COMS (* ; "Browser selection") (FNS LAB.SELECTMESSAGE LAB.CHANGEMARK LA.READ.NEW.MARK YPOS.TO.MESSAGE# MESSAGE#.TO.YPOS) (FNS LA.CONSIDERRANGE LA.DECONSIDERRANGE LA.RECONSIDERRANGE LA.SELECTRANGE LA.DESELECTRANGE LAB.FIND.SELECTED.MSG LAB.REV.FIND.SELECTED.MSG LA.UNDOSELECTION LA.VERIFY.SELECTION)) (COMS (* ; "Browser display") (FNS LAB.PROMPTPRINT \LAFITE.MAYBE.CLEAR.PROMPT) (FNS PRINTMESSAGESUMMARY FIRSTVISIBLEMESSAGE LASTVISIBLEMESSAGE LAB.DISPLAYLINES LAB.EXPOSEMESSAGE UNSELECTALLMESSAGES SELECTMESSAGE MARKMESSAGE CHANGEFLAGINFOLDER LA.SHOW.MARK LA.INVERT.MARK.BOX LA.BLT.MARK.BOX LA.SHOW.DELETION LA.SHOW.SELECTION SEENMESSAGE DELETEMESSAGE UNDELETEMESSAGE)) (COMS (* ; "ICON stuff *") (BITMAPS MSGFOLDERICON MSGFOLDERMASK) ( FILES ICONW) (FNS LAB.ICONFN) (INITVARS MSGFOLDERTEMPLATE)) (COMS (* ; "UPDATE") (FNS \LAFITE.UPDATE \LAFITE.EXPUNGE.PROC \LAFITE.UPDATE.PROC \LAFITE.HARDCOPYONLY.PROC LAB.CHOOSE.UPDATE.MENU \LAFITE.START.UPDATE \LAFITE.FINISH.UPDATE \LAFITE.CLOSE.OTHER.FOLDERS) (FNS LAB.FLUSHWINDOW LAB.APPENDMESSAGES \LAFITE.COMPACT.FOLDER \LAFITE.COMPACT.FOLDER1 \LAFITE.UPDATE.FOLDER \LAFITE.UPDATE.CONTENTS \LAFITE.UPDATE.CONTENTS1 WRITETOCENTRY WRITETOCMARKBYTES WRITEFOLDERMARKBYTES LA.OPENTEMPFILE)) (COMS (* ; "DISPLAY") (FNS \LAFITE.DISPLAY \LAFITE.DO.DISPLAY SELECTMESSAGETODISPLAY MESSAGEDISPLAYER LA.COPY.MESSAGE.TEXT \LAFITE.CLOSE.DISPLAYWINDOWS \LAFITE.CLOSE.DISPLAYER)) (COMS (* ; "DELETE & MOVE") (FNS \LAFITE.DELETE DISPLAYAFTERDELETE \LAFITE.SELECT.NEXT \LAFITE.UNDELETE \LAFITE.MOVETO \LAFITE.MOVETO.PROC \LAFITE.OPEN.DESTINATION)) (COMS (* ; "HARDCOPY") (FNS \LAFITE.HARDCOPY \LAFITE.HARDCOPY.PROC \LAFITE.HARDCOPY.HEADERS \LAFITE.MARK.HARDCOPIED \LAFITE.TRANSMIT.HARDCOPY \LAFITE.HARDCOPY.BODIES \LAFITE.DO.PENDING.HARDCOPY)) (COMS (INITVARS ( LAFITEEXTRAMENUFLG) (LAFITEHARDCOPYBATCHFLG) (LAFITEHARDCOPY.MIN.TOC) (LAFITEFROMFRACTION 0.3) ( LAFITEMINFROMCHARS 15) (LAFITEIMMEDIATECHANGESFLG) (LAFITEVERIFYFLG T) (LAFITEDISPLAYAFTERDELETEFLG T) (LAFITEMOVETOCONFIRMFLG (QUOTE ALWAYS)) (LAFITEREADONLYFLG T) (LAFITEDELETEDLINEHEIGHT 1) ( LAFITENEWPAGEFLG T) (LAFITEBROWSERREGION (create REGION LEFT _ 30 BOTTOM _ 30 WIDTH _ 575 HEIGHT _ 210 )) (LAFITEDISPLAYREGION (create REGION LEFT _ 375 BOTTOM _ 25 WIDTH _ 600 HEIGHT _ 335)) ( LAFITEENDOFMESSAGESTR "End of message") (LAFITEENDOFMESSAGEFONT (FONTCREATE (QUOTE (TIMESROMAN 10 ITALIC)))) (LAFITE.BROWSER.ICON.PREFERENCE)) (INITVARS (LAFITETEMPFILEHOSTNAME (QUOTE CORE)) ( LAFITEHARDCOPYBATCHSHADE 1025) (LAFITEHARDCOPYSEPARATOR " Next Message ")) (VARS LAFITEBROWSERMENUITEMS LAFITESUBBROWSEMENUITEMS) (INITVARS (LAFITESUBBROWSEMENU)) (VARS ( BROWSERMARKXPOSITION 8)) (BITMAPS LA.SELECTION.BITMAP)) (DECLARE%: DOEVAL@COMPILE DONTCOPY (CONSTANTS * TOCSTATES) (FILES (SOURCE) LAFITEDECLS) (GLOBALVARS LAFITE.BROWSER.ICON.PREFERENCE MSGFOLDERTEMPLATE )) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA LAB.PROMPTPRINT))))) (RPAQ MSGFOLDERICON (READBITMAP)) (100 72 "@OOOOOOOO@@@@@@@@@@@@@@@@@@@" "AOOOOOOOOH@@@@@@@@@@@@@@@@@@" "C@@@@@@@@L@@@@@@@@@@@@@@@@@@" "F@@@@@@@@F@@@@@@@@@@@@@@@@@@" "L@DA@@@@@C@@@@@@@@@@@@@@@@@@" "L@FC@@@@@C@@@@@@@@@@@@@@@@@@" "L@EE@HGB@C@@@@@@@@@@@@@@@@@@" "L@EEADBB@C@@@@@@@@@@@@@@@@@@" "L@DIBBBB@COOOOOOOOOOOOOOL@@@" "L@DACNBB@COOOOOOOOOOOOOOL@@@" "L@DABBGCL@@@@@@@@@@@@@@@L@@@" "L@@@@@@@@@@@@@@@@@@@@@@@L@@@" "L@@@@@@@@@@@@@@@@@@@@@@@L@@@" "LOOOOOOOOOOOOOOOOOOOOOOOO@@@" "LOOOOOOOOOOOOOOOOOOOOOOOO@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "LL@@@@@@@@@@@@@@@@@@@@@@C@@@" "FL@@@@@@@@@@@@@@@@@@@@@@C@@@" "CL@@@@@@@@@@@@@@@@@@@@@@C@@@" "AOOOOOOOOOOOOOOOOOOOOOOOO@@@" "@OOOOOOOOOOOOOOOOOOOOOOOO@@@") (RPAQ MSGFOLDERMASK (READBITMAP)) (100 72 "@OOOOOOOO@@@@@@@@@@@@@@@@@@@" "AOOOOOOOOH@@@@@@@@@@@@@@@@@@" "COOOOOOOOL@@@@@@@@@@@@@@@@@@" "GOOOOOOOON@@@@@@@@@@@@@@@@@@" "OOOOOOOOOO@@@@@@@@@@@@@@@@@@" "OOOOOOOOOO@@@@@@@@@@@@@@@@@@" "OOOOOOOOOO@@@@@@@@@@@@@@@@@@" "OOOOOOOOOO@@@@@@@@@@@@@@@@@@" "OOOOOOOOOOOOOOOOOOOOOOOOL@@@" "OOOOOOOOOOOOOOOOOOOOOOOOL@@@" "OOOOOOOOOOOOOOOOOOOOOOOOL@@@" "OOOOOOOOOOOOOOOOOOOOOOOOL@@@" "OOOOOOOOOOOOOOOOOOOOOOOOL@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "OOOOOOOOOOOOOOOOOOOOOOOOO@@@" "GOOOOOOOOOOOOOOOOOOOOOOOO@@@" "COOOOOOOOOOOOOOOOOOOOOOOO@@@" "AOOOOOOOOOOOOOOOOOOOOOOOO@@@" "@OOOOOOOOOOOOOOOOOOOOOOOO@@@") (FILESLOAD ICONW) (RPAQ? MSGFOLDERTEMPLATE NIL) (RPAQ? LAFITEEXTRAMENUFLG) (RPAQ? LAFITEHARDCOPYBATCHFLG) (RPAQ? LAFITEHARDCOPY.MIN.TOC) (RPAQ? LAFITEFROMFRACTION 0.3) (RPAQ? LAFITEMINFROMCHARS 15) (RPAQ? LAFITEIMMEDIATECHANGESFLG) (RPAQ? LAFITEVERIFYFLG T) (RPAQ? LAFITEDISPLAYAFTERDELETEFLG T) (RPAQ? LAFITEMOVETOCONFIRMFLG (QUOTE ALWAYS)) (RPAQ? LAFITEREADONLYFLG T) (RPAQ? LAFITEDELETEDLINEHEIGHT 1) (RPAQ? LAFITENEWPAGEFLG T) (RPAQ? LAFITEBROWSERREGION (create REGION LEFT _ 30 BOTTOM _ 30 WIDTH _ 575 HEIGHT _ 210)) (RPAQ? LAFITEDISPLAYREGION (create REGION LEFT _ 375 BOTTOM _ 25 WIDTH _ 600 HEIGHT _ 335)) (RPAQ? LAFITEENDOFMESSAGESTR "End of message") (RPAQ? LAFITEENDOFMESSAGEFONT (FONTCREATE (QUOTE (TIMESROMAN 10 ITALIC)))) (RPAQ? LAFITE.BROWSER.ICON.PREFERENCE) (RPAQ? LAFITETEMPFILEHOSTNAME (QUOTE CORE)) (RPAQ? LAFITEHARDCOPYBATCHSHADE 1025) (RPAQ? LAFITEHARDCOPYSEPARATOR " Next Message ") (RPAQQ LAFITEBROWSERMENUITEMS (("Display" (QUOTE \LAFITE.DISPLAY) "Displays the selected message in the display window.") ("Delete" (QUOTE \LAFITE.DELETE) "Deletes the selected messages.") ("Undelete" (QUOTE \LAFITE.UNDELETE) "Undeletes the selected messages.") ("Answer" (QUOTE \LAFITE.ANSWER) "Prepares a delivery form to reply to the selected message.") ("Forward" (QUOTE \LAFITE.FORWARD) "Prepares a delivery form to forward the selected message(s).") ("Hardcopy" (QUOTE \LAFITE.HARDCOPY) "Sends hardcopy of the selected message(s) to the default printer") ("Move To" (QUOTE \LAFITE.MOVETO) "Moves the selected message(s) to another mail folder.") ("Update" (QUOTE \LAFITE.UPDATE) "Write out browser changes to the physical mail file. Option to expunge all deleted messages.") ("Get Mail" (QUOTE \LAFITE.GETMAIL) "Retrieves new messages and puts them into this mail folder."))) (RPAQQ LAFITESUBBROWSEMENUITEMS (("Browse" (FUNCTION \LAFITE.BROWSE.PROC) "Browse a mail file") ( "Browse Laurel File" (FUNCTION \LAFITE.BROWSE.LAURELFILE) "Massages Laurel File before browsing with Lafite") ("Forget Folder" (FUNCTION \LAFITE.UNCACHE.FOLDER) "Remove a folder from list of known folders" (SUBITEMS ("Forget Folders" (QUOTE \LAFITE.UNCACHE.FOLDER.MULTIPLE)))) ("Forget Message Form" (FUNCTION \LAFITE.UNCACHE.MESSAGEFORM) "Remove a form from list of known message forms") ("Notice Folders" (FUNCTION \LAFITE.NOTICE.FOLDERS) "Scan specified directory and add any folders found to the list of known folders") ("Clean up Folders" (FUNCTION \LAFITE.GC.FOLDERS) "Check that all known folders correspond to actual files; remove those that no longer exist"))) (RPAQ? LAFITESUBBROWSEMENU) (RPAQQ BROWSERMARKXPOSITION 8) (RPAQ LA.SELECTION.BITMAP (READBITMAP)) (8 10 "L@@@" "N@@@" "O@@@" "OH@@" "OL@@" "OH@@" "O@@@" "N@@@" "L@@@" "@@@@") (PUTPROPS LAFITEBROWSE COPYRIGHT ("Xerox Corporation" 1984 1985 1986)) NIL