github.com/Interlisp.medley
1
0
Fork 0
mirror of synced 2026-01-13 15:37:38 +00:00
Code Issues Projects Releases Wiki Activity
Interlisp.medley/lispusers/MANAGER.TEDIT
Matt Heffron d92aa6395a
Manager (Lispusers) grow anchor, icon, and fix typo. (#1346) 
* File See operations use full path to loaded file.
Add Manager.WINDOW-ANCHOR to fix corner from which MANAGER-MAIN-WINDOW grows, and (attempt) to keep it on-screen.

* Improved handling of the ICONW for MANAGER-MAIN-WINDOW.

* Fix typo in MasterScope functions (multiple occurrences: LOADBFLG should be LOADDBFLG).
Changed to CL compiler by default (not need to go to submenu). This is my preference, so I should remove it before setting pull request.

* Manual cleanup of multiple "Edited" comments in 4 FNS.
Reverted: Changed to CL compiler by default (not need to go to submenu). (From commit f60c6362)

* Update MANAGER.TEDIT documentation file.
Fix error in previous commit. (Changes that I thought were there, were not.)
Cleanup COMMON-MAKE COMS so it can be handled by the file package, and add .LCOM file to the repo.
2023-10-14 06:39:13 -07:00

83 lines
40 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

en·vÅos MANAGER
2
4
1
MANAGER
1
4
By: Jay Ferguson, Larry Masinter and Andrew Cameron III
Maintained by Ron Fischer (Fischer.pa@Xerox.com)
Revised by Matt Heffron (heffron@alumni.caltech.edu)
Uses: MASTERSCOPE, FILEBROWSER, DATABASEFNS, and COMMON-MAKE
INTRODUCTION
In its latest incarnation Manager supports MasterScope and improves its performance. It can use DATABASEFNS for managing MasterScope databases, per file. It will use COMMON-MAKE (from Lispusers) to write files in CommonLisp format; and it borrows some lower-level functionality from FILEBROWSER.
USING MANAGER:
Manager provides a way to perform most common File Manager operations onscreen using menus, both pop-up and permanent. Activity centers around the filelst, or main, menu, and menus of items of a type in the file (like all FNS, or all VARS).
Printing and interaction is done through the Manager Command Activity Window. The first time it is needed you'll be prompted to size it onto the display. Thereafter, it will be used as needed. If shrunken before use it will wait 10 seconds after an operation and then shrink down again.
The FILELST menu
The manager provides a menu of the FILELST:
a;ˆˆˆˆˆˆˆˆˆˆˆˆ€ˆˆˆˆˆˆˆˆˆˆˆˆ€""""""""""""""""""""""""ˆˆˆˆˆˆˆˆˆˆˆˆ€ˆˆˆˆˆˆˆˆˆˆˆˆ€'ÿÿÿÿÿÿÿÿÿÿ¢'ÿÿÿÿÿÿÿÿÿÿ¢<00>ÿÿÿÿÿÿÿÿÿÿˆ€<00>ÏŸÿÿÿÿÿÿÿÿˆ€'ÏŸÿÿÿÿÿÿÿÿ¢'×\txñqÓÿÿÿ¢<00>×[³·nnËÿÿÿˆ€<00>ÚÞ7¼o`ßÿÿÿˆ€'ÚÙ·³ooßÿÿÿ¢'ÝÛ··nnßÿÿÿ¢<00>ÝÜW¸±qßÿÿÿˆ€<00>ÿÿÿÿïÿÿÿÿˆ€'ÿÿÿÿðÿÿÿÿÿ¢'ÿÿÿÿÿÿÿÿÿÿ¢Žˆ€Žˆ€&¢&¢Ž Oà€GÇÀ<00>ˆ€Ž „A€H$ Aˆ€& DA€H ¡¢& $A€G„ Q¢Ž $A€@GÀ¡ˆ€Ž A€@$Aˆ€& A€H$<00>¢& AüGÄ¢Žˆ€Žˆ€&¢&¢Ž0AÏÀ<C38F>ˆ€Ž0A„ <20>!Aˆ€&P¡D(@ ¡¢&P¡$(@ˆ!Q¢Ž‘$DG<44>À¡ˆ€Ž‘ñ|@<40>!Aˆ€& ‚!<21> <20>¢& ‚ŸÈ!¢Žˆ€Žˆ€&¢&¢<00>ÿÿÿÿÿÿÿÿÿÿˆ€<00>ÿÿÿÿÿÿÿÿÿÿˆ€""""""""""""""""""""""""ˆˆˆˆˆˆˆˆˆˆˆˆ€ˆˆˆˆˆˆˆˆˆˆˆˆ€""""""""""""""""""""""""ˆˆˆˆˆˆˆˆˆˆˆˆ€ˆˆˆˆˆˆˆˆˆˆˆˆ€""""""""""""(0.75 (DISPLAY 1)) 0 0 with icon X9DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDÿÿÿÿôDDDD?ÿÿÿÿñ2ÿÿÿñDuDDDôDDDDDwuuUÿôDDDD7ED]ÿñ7EGEÿñDÿüÿôDDDDDÿÿÿÿôDDDD &ÀDe]Ô”DDDDE¤UTWÿÿüD¤QT—ÿÿý¤]\ßÿýE ˆÿüDE¿ÿÿÿÿ÷ÚÿüD Úÿý§€ØÿýE¤€€—ÿÿüDE§;»€WÿÿüD$‹;€<02>$¹¢€%cuE';»€UTDDE UddD?ÿÿÿÿñUTE "SuE$€DE¥ÝÝ;º—ÿÿüD%IUŠ)P%I:"<22>E%MÑ;¹¨æ„DE (ˆDD?ÿÿÿÿó(ÎE(‚EExy2.ì„DEDÿÿÿÿÿÿÿÿýDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD(0.75 (DISPLAY 1)) 0 0 when "shrunk".
The names in the FILELST menu can be copy selected.
Middle buttoning on the title bar of the FILELST menu pops up a menu of operations which are applied to all loaded files:
Ö©ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ"""""""""""""""""""""""""" """""""""""""""""""""""""" ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ"""""""""""""""""""""""""" """""""""/ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿ ˆˆˆˆˆˆˆˆˆ<CB86>ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿˆˆˆˆˆˆˆˆˆˆ<CB86>ÿÿÿÿÿÿÿÿÿÿÿÿïÿÿÿˆ"""""""""/óçÿÿÿÿÿÿÿÿÿþïÿÿÿ """""""""/óçÿÿÿÿÿÿÿÿÿþÿÿÿÿ ˆˆˆˆˆˆˆˆˆ<CB86>õ×<\tøtxéŒ.?ˆˆˆˆˆˆˆˆˆˆ<CB86>õÖìíÛ›²÷³·evíìí߈"""""""""/ö·<C3B6>ïØ7÷·°oÆííî? """""""""/ö¶mìÛÛ÷÷··ï6ííïß ˆˆˆˆˆˆˆˆˆ<CB86>÷vííÛ›·÷³·ovííí߈ˆˆˆˆˆˆˆˆˆ<CB86>÷wî,\wøtxï‹.î?ˆ"""""""""/ÿÿÿÿûßÿÿ÷ÿÿÿÿÿÿÿ """""""""/ÿÿÿÿü?ÿÿ÷ÿÿÿÿÿÿÿ ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ"""""""""(€ò@ """""""""(€@ ˆˆˆˆˆˆˆˆˆˆŠ8ˆâGˆˆˆˆˆˆˆˆˆˆˆŠD‘âH‘ˆ"""""""""(R¡òOŽ """""""""(RdÑH ˆˆˆˆˆˆˆˆˆˆ"D‰H‘ˆˆˆˆˆˆˆˆˆˆˆ":„âGˆ"""""""""( """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆAˆ"""""""""(ˆ! """""""""(HQ ˆˆˆˆˆˆˆˆˆˆáÅÄà)ˆˆˆˆˆˆˆˆˆˆˆ &$Uˆ"""""""""( ðä$) """""""""( $$Q ˆˆˆˆˆˆˆˆˆˆI$$!ˆˆˆˆˆˆˆˆˆˆˆˆáÔ#âàAˆ"""""""""( """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ"""""""""(  """""""""(!  ˆˆˆˆˆˆˆˆˆˆ@.\:8pˆˆˆˆˆˆˆˆˆˆˆ@1"bFDˆˆ"""""""""(@!BB|p """""""""(@!2BB@ ˆˆˆˆˆˆˆˆˆˆ!!"BFDˆˆˆˆˆˆˆˆˆˆˆˆ!B:8pˆ"""""""""(B """""""""(< ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆAˆ"""""""""(ƒà~ù|! """""""""(ƒ ‚A„‚Q ˆˆˆˆˆˆˆˆˆˆE çœA8qD€)ˆˆˆˆˆˆˆˆˆˆˆE "~"D‰ñ$xUˆ"""""""""()rA8ù$) """""""""()‚ ’2A2<04>Q ˆˆˆˆˆˆˆˆˆˆ ‚"A"D‰ ‚!ˆˆˆˆˆˆˆˆˆˆˆàé<C3A0>~8q|Aˆ"""""""""( """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ"""""""""(’À """""""""(  ˆˆˆˆˆˆˆˆˆˆ8q ˆˆˆˆˆˆˆˆˆˆˆDˆ@ˆ"""""""""(|p€ """""""""(@€ ˆˆˆˆˆˆˆˆˆˆDˆˆˆˆˆˆˆˆˆˆˆˆ8p€ˆ"""""""""(€ """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆAˆ"""""""""(! """""""""(Q ˆˆˆˆˆˆˆˆˆˆ(::)ˆˆˆˆˆˆˆˆˆˆˆ(FFUˆ"""""""""(DBB) """""""""(|BBQ ˆˆˆˆˆˆˆˆˆˆ‚FF!ˆˆˆˆˆˆˆˆˆˆˆ‚::Aˆ"""""""""( """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€ˆ"""""""""(€ """""""""( ˆˆˆˆˆˆˆˆˆˆ(:DŽˆˆˆˆˆˆˆˆˆˆˆ(FD‘"ˆ"""""""""(DB(<28>> """""""""(|B(<28>  ˆˆˆˆˆˆˆˆˆˆ‚F‘"ˆˆˆˆˆˆˆˆˆˆˆ‚:Žˆ"""""""""( """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆAˆ"""""""""(|<00><18>! """""""""(‚<00>€Q ˆˆˆˆˆˆˆˆˆˆ€9á’áÑâ" ‡)ˆˆˆˆˆˆˆˆˆˆˆxD€¥2" H˜<48>šUˆ"""""""""(|€¥TˆH<10><>) """""""""(@€¥TˆH<10><>Q ˆˆˆˆˆˆˆˆˆˆ‚D€B2ˆHH<48><48><EFBFBD>!ˆˆˆˆˆˆˆˆˆˆˆ|8`BÑàˆHG<10>Aˆ"""""""""( """""""""( ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ Aˆ"""""""""(<$! """""""""(BQ ‰ÿÿÿÿÿÿÿÿø<00>!/)ˆ‰ÿÿÿÿÿÿÿÿø<00>!$Uˆ#ÿÿÿÿÿÿÿÿø<00>!$) #óçÿÿÿÿÿÿø‰!$Q ‰óçÿÿÿÿÿÿøF#$!ˆ‰õ×<\tÿø>#Aˆ#õÖìíÛ›²ÿø #ö·<C3B6>ïØ7ÿø ‰ö¶mìÛÛ÷ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿˆ‰÷vííÛ›·ÿÿÿ興ˆˆˆˆˆˆˆˆˆˆˆˆˆ#÷wî,\wÿÿÿâ"""""""""""""" #ÿÿÿÿûßÿÿÿÿâ"""""""""""""" ‰ÿÿÿÿü?ÿÿÿÿ興ˆˆˆˆˆˆˆˆˆˆˆˆˆ‰ÿÿÿÿÿÿÿÿÿÿ興ˆˆˆˆˆˆˆˆˆˆˆˆˆ#€b"""""""""""""" #€b"""""""""""""" ‰€hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰€@hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#‚Aø ñð b"""""""""""""" #‚a@  Pb"""""""""""""" ‰‚Q@ (hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰‚I@ áThˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#‚I@ ð(b"""""""""""""" #‚E@  Pb"""""""""""""" ‰‚CB  hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰‚AB?ñ@hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#€b"""""""""""""" #€b"""""""""""""" ‰€hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰€@hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#† AÇóð b"""""""""""""" #† a$Pb"""""""""""""" ‰…(Q
(hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰…(I
âThˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#„¤DIäð(b"""""""""""""" #„¤|E$Pb"""""""""""""" ‰„D‚C ˆd hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰„D‚A ‡§ò@hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#€b"""""""""""""" #€b"""""""""""""" ‰€hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ‰€hˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ#ÿÿÿÿÿÿÿÿÿÿâ"""""""""""""" #ÿÿÿÿÿÿÿÿÿÿâ"""""""""""""" ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ"""""""""""""""""""""""""" """""""""""""""""""""""""" ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ(0.75 (DISPLAY 1)) 0 0
These operations are the same as the similarly named functions in the File Manager interface, except for the following slide off options:
CleanUp:
Set default: TCOMPL, the default compiler will be TCOMPL.
Set default: CL:COMPILE-FILE, the default compiler will be CL:COMPILE-FILE.
MS DataBase FNS:
various MasterScope database flags can be set
Add, notice a file via:
LOADFNS
LOADFROM
LOAD
ADDFILE*
Edit FILELST, edit the FILELST directly in a lisp editor window.
Quit:
Quit*, shut down the Manager, all menu caches cleared, windows closed.
Reset, shut down and turn on the Manager again.
Left buttoning on a file in the FILELST menu (without sliding off) pops up a menu of operations on that file:
<00>‡DDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDD@DDDDDDDÿÿÿÿÿÿÿÿÿÿô@DDDDDDDÿÿÿÿÿÿÿÿÿÿô@÷ÿÿÿÿÿÿïÿÿñp6ÿÿÿÿÿþïÿÿñDDDDDDDwþÿÿÿÿÿþÿÿÿô@DDDDDDDwöãøtxéŒ.4@pvÝ÷³·evíìíÑwöÁ÷·°oÆííî1DDDDDDDwöß÷··ï6ííïÔ@DDDDDDDwöÝ÷³·ovíííÔ@wöãøtxï‹.î1ÿÿÿ÷ÿÿÿÿÿÿñDDDDDDDÿÿÿ÷ÿÿÿÿÿÿô@DDDDDDD@@@@>DDDDDDD@A@DDDDDDD@@8”@@<"DQ@>|‘DDDDDDD@ @@DDDDDDD@A"D@@>8@DDDDDDD@@DDDDDDD@@@@à@DDDDDDD@$@@DDDDDDD@$Â@<8t”@@D!@BDŒQ@Gãá@B„‘DDDDDDD@D@Bd„@DDDDDDD@D!@BDŒ@@$Â~<:t@ DDDDDDD@@DDDDDDD@@@ @0`?$DDDDDDD@0` @DDDDDDD@(£ˆŽ $p”@@(¤I>$ˆQ@%!Ê $ø‘DDDDDDD@%&M $€@DDDDDDD@"$H‘ $ˆ@@"#¨N $p@DDDDDDD@@DDDDDDD@@@ @ DDDDDDD@ @DDDDDDD@ #ž@@ $H@ #ˆDDDDDDD@ H@DDDDDDD@ $H@@?#†@DDDDDDD@@DDDDDDD@@@@ˆDDDDDDD@H@DDDDDDD@áÅÄà”@@ &$Q@ ðä$‘DDDDDDD@ $$@DDDDDDD@I$$@@ˆáÔ#âà@DDDDDDD@@DDDDDDD@@@F ðDÿÿÿÿÿÿÆ @DÿÿÿÿÿÿÅpçœZáâá”@ÿÿÿÿÿÿʼn"iá%QùóÿÿÿÿĤ8â>@â‘DùóÿÿÿÿĤÈ @ @DúëŽ<C3AB>.DD‰"B "@úëvvíÍÄDtáœAðáâáÄû[Æ÷<C386>ì@Dû[6ömíÀ@Dû»vöíÍÀ@û»Š÷.@€ÿÿÿÿýïÀÀ<00>DÿÿÿÿþÀ @DÿÿÿÿÿÿÀظ‘À”@À@&dÄ’ QÀ@$D„“à‘DÀ@$D„’@DÀ@$$DÄ’ @Á ‰üÀÃÄD¸‘ÀÁ0ˆ  @€DÁ(ˆ  @€@DÁ$ˆ À@Á$ˆ @Á"ˆ @DÁ!ˆ! @<10>@DÁ ˆ!ˆÀ .8”@À@ ‘1#"DQÀ@ ‡!!>8‘DÀ@ ™!! @DÀ@<10>‘!#"D@à ‚ÀŽ¡8Ã0‚@!DŠ(…@@DŠ$…ÿÿÿÿÿÿÿÿÿÿô@ÂR"$ˆˆòø1ÂR>"<22>ˆ(1DÂ"A!<21>D24DDDDDDD@DÂ"A <20>CÓù 4DDDDDDD@À1À1DÀ4DDDDDDD@DÀ4DDDDDDD@ÿÿÿÿÿÿÿÿÿÿñÿÿÿÿÿÿÿÿÿÿñDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDD@(0.75 (DISPLAY 1)) 0 0
See:
fast*, prints the source of the file.
scrollable, displayed in a scrollable TEdit window.
(Re)Load:
Load*, use current DFNFLG settings.
Sysload, load with File Manager turned off.
MakeFile, dump the file
MakeFile*, dump the source of the file by remaking it.
New, dump the source without copying unchanged defs from existing file.
Fast, dump source without prettyprinting (fast).
CommonLisp, dump source in commonlisp format.
List, list the source file on the default printer.
CleanUp:
CleanUp*, dump the file according to CLEANUPOPTIONS.
Set default compiler: TCOMPL.
Set default compiler: CL:COMPILE-FILE.
MasterScope:
Analyze*, analyze the fns on the file.
Check, check the file for problems.
Show Paths, show paths of function calls on this file.
DatabaseFNS, display the database property for this file:
Set to ASK, ask about saving MS DB information.
Set to ON, automatically maintain MS DB information.
Set to OFF, do not save MS DB information.
Load DB, load an existing MS DB for this file.
Dump DB, dump the current MS DB for this file.
Compile:
Compile*, compile the file based on the current settings.
CL:COMPILE-FILE, compile the file with CL:COMPILE-FILE.
Changes:
Brief*, prints the changes that have been made to this file.
Everything, prints the complete list of files changes.
Edit PL, brings up a lisp editor on the file's property list.
Middle buttoning on a file in the filelst menu (without sliding off) pops up a menu of generic operations on that file:
ŒWDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDD@ÿÿÿÿÿÿÿÿÿÿÿÿñDDD_ÿÿÿÿÿÿÿÿÿÿÿÿä@DDD_ÿÿÿÿÿÿÿÿÿßÿÿä@wÿÿÿÿÿÿýßÿÿñ÷wÿÿÿÿÿÿýÿÿÿñDDD]úxéðèñÓ\:<d@DDD]ûs·eïgnÊíÛÙÛ¤@ûw°oïo`ß<>ÛÛÜqûw·ïïooÞmÛÛß±DOÿþ÷w·oïgnÞíÛÛÛ¤@DOÿÿ—¸ïðèñß\;Üd@ÿÿÿÿÿÿÿïÿÿÿÿÿÿñŸ?ÿÿÿÿÿïÿÿÿÿÿÿñDOŸ0$@DO®°$@®°à€1µ°€1DOµ°â9ç$@DO»° Dˆ€$@»° ò|<7C>€1ÿð @ˆ1DOÿðDˆ€$@DOÿðàâ8g$@11DL$@DL$@ü1‚1DL<12>‚8¸qf$@DLP‚Dĉ™"$@Pü|„9>10‚@„É 1DL‚D„‰"$@DL‚8„u$@11DL$@DL$@0p<10pB1DL(°€<\D$@DL(°€BbD$@%0€BB(1%0€BB(1DL"0BBb$@DL"0<<\$@@1@`1DL$@DL$@ÿð`À€1ÿð`À€1DDDPQGˆ$@DDDPQHš<48>$@JC<4A> 1JL<4A>Ð1DDDPDH<44>ˆ$@DDDPDGP„$@11DDDP$@DDDP$@A@1A@1DDDPA.,ËD$@DDDPA13$MH$@A!"!ÈP1A!"&Hh1DDDPA!"$HD$@DDDP>!"#¨B$@11DDD_ÿÿÿÿÿÿÿÿÿÿÿÿä@DDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDD@(0.75 (DISPLAY 1)) 0 0
Delete, removes the file object from the system.
Rename, prompts for a new name and renames the file.
Copy, prompts for a new name and copies the file under that name.
Mark, mark the contents of the file as changed.
Unmark, unmark the contents of the file as changed.
Left buttoning on a file and sliding off to the right pops up a menu of types in the file:
¤Wˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€"""""""""""""""""""" """""""""""""""""""" ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€"""""""""""""""""""" """"""""""#ÿÿÿÿÿÿÿÿú ˆˆˆˆˆˆˆˆˆˆŠ€ˆˆˆˆˆˆˆˆˆˆŠ€""""""""""">D<
"""""""""""!DB@
ˆˆˆˆˆˆˆˆˆˆŠ ˆ„€@€ˆˆˆˆˆˆˆˆˆˆŠ ˆ„€~€"""""""""""" …€@
"""""""""""> …€@
ˆˆˆˆˆˆˆˆˆˆŠA!B@€ˆˆˆˆˆˆˆˆˆˆŠA><€"""""""""""
"""""""""""
ˆˆˆˆˆˆˆˆˆˆŠ€ˆˆˆˆˆˆˆˆˆˆŠ€"""""""""""~$ò ü>
"""""""""""@$ ‚A
ˆˆˆˆˆˆˆˆˆˆŠ@$P‚@€ˆˆˆˆˆˆˆˆˆˆŠ|$áP‚<€"""""""""""@$ ˆü
"""""""""""@$ ø‚
ˆˆˆˆˆˆˆˆˆˆŠ@$A‚A€ˆˆˆˆˆˆˆˆˆˆŠ@'çðA‚>€"""""""""""
"""""""""""
ˆˆˆˆˆˆˆˆˆˆŠ€ˆˆˆˆˆˆˆˆˆˆŠ€"""""""""""~A
"""""""""""@a €
‰ÿÿÿÿÿÿÿÿÿþ@Q €‰ÿÿÿÿÿÿÿÿÿþ|I€#ÿÿÿÿÿÿÿÿÿþ@I
#óçÿÿÿÿÿÿÿþ@E€
‰óçÿÿÿÿÿÿÿþ@C €€‰õ×<\tÿÿþ@A€#õÖìíÛ›²ÿÿþ
#ö·<C3B6>ïØ7ÿÿþ
‰ö¶mìÛÛ÷ÿÿÿÿÿÿÿÿÿÿÿø€‰÷vííÛ›·ÿÿÿÿÿÿÿÿÿÿÿø€#÷wî,\wÿÿÿŸ>þ‡Áÿú #ÿÿÿÿûßÿÿÿÿŸ>ýí÷{¾ÿú ‰ÿÿÿÿü?ÿÿÿÿ®½{ýöý¿ÿø€‰ÿÿÿÿÿÿÿÿÿÿ®½{ýöýÃÿø€#€µ»»üýýÿú #€µ¸;ýöýþÿú ‰€»·Ýí÷{¾ÿø€‰€C»·Þ÷‡Áÿø€#‚Aø ñð#ÿÿÿÿÿÿÿÿú #‚a@  Sÿÿÿÿÿÿÿÿú ‰‚Q@ *€‰‚I@ áV€#‚I@ ð*|~‡À
#‚E@  RBAˆH
‰‚CB  "BA HH€‰‚AB?ñBBA HG€€#€|~ O€@
#€@A H
‰Ÿÿÿÿÿÿÿÿÿþ@Aˆ €‰Ÿÿÿÿÿÿÿÿÿ¾@AÀ€#™óï¾ûø8 Þ
#™óïžû÷Ûý÷®
‰šë×®õïûý÷Ö€‰šë׶õïø÷ª€#›[»¶îîüÖA‡À
#›[ƒºàïÛý÷®AH
‰›»}¼ßw›ý÷Þ"
H€‰›»}¾ßxX
÷¾"
G€€#Ÿÿÿÿÿÿÿÿÿþ€@
#Ÿÿÿÿÿÿÿÿÿþ@
‰€ <20>H €‰€ <20>GÀ€#ÿÿÿÿÿÿÿÿÿþ
#ÿÿÿÿÿÿÿÿÿþ
ˆˆˆˆˆˆˆˆˆˆ‹ÿÿÿÿÿÿÿÿø€ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€"""""""""""""""""""" """""""""""""""""""" ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€ˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆˆ€"""""""""""""""""""" """""""""""""""""""" (0.75 (DISPLAY 1)) 0 0
Releasing on one of these places a menu of items of that type on the file:
Õ]DDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@ÿÿÿÿÿÿÿÿÿÿÑÿÿÿÿÿÿÿÿÿÿÑGÿÿÿÿÿÿÿÿÿÿÄDDDDDDDDDDDDDD@GçÏÿÿÿÿÿÿÿÿÄDDDDDDDDDDDDDD@çÏÿÿÿÿÿÿÿÿÑë®:<x¸éÿÿÿÑGë­ÙÛ·7eÿÿÿÄDDDDDDDDDDDDDD@GíoÞ7°oÿÿÿÄDDDDDDDDDDDDDD@ílÛÙ··ïÿÿÿÑîíÛÛ·7oÿÿÿÑGîî+ÜX¸ïÿÿÿÄDDDDDDDDDDDDDD@Gÿÿÿÿ÷¿ÿÿÿÿÄDDDDDDDDDDDDDD@ÿÿÿÿøÿÿÿÿÑÿÿÿÿÿÿÿÿÿÿÑGÄDDDDDDDDDDDDDD@GÄDDDDDDDDDDDDDD@Ñ€ÑG‚'ð@#ãà@ÄDDDDDDDDDDDDDD@G €@$ ÄDDDDDDDDDDDDDD@¢ €@$PÑ’ €ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñG’ €ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿô@GŠ €ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿô@† „~|ûøp>ÿÿüù÷ß}üÿñ‚ „~|û÷·Ýîûÿÿüù÷Ï}ûíþûÿñG>ºõï÷Ûöÿðèýuë×z÷ýþûÿô@G>ºõï÷Û÷ïg}uëÛz÷üûÿô@>Öîïð;÷÷ïo}­ÝÛww
þÿñ>Öàï÷Û÷ûïo}­ÁÝpwíþûÿñG  ‚>îßw·Ýîûïo}ݾÞo»Íþûÿô@G  Â>îßxwÞðï}ݾßo¼,ûÿô@
(P¢?ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñ
(P’?ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñG Hˆ’?ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿô@G HøŠ04@‰†p1‰‚p1G04@G0>?Ÿßô4@0A <10>„10€ B€„Š1Gÿÿÿÿð€?B€„Š4@Gÿÿÿÿð<C3BF> D@„R4@0<> GÀ„R10C ˆ „"1DDDDDp=?‚ ƒâ"4@DDDDDp4@0101DDDDDp4@DDDDDpÁ€A† Á‚'À4@0Á€"ˆF Á‚ $ 10¢Ž.:8°" %¢…
$1DDDDDp¢‘1"FDÐ %¢… $4@DDDDDp”‡!B|€ $¤”ˆ‰$4@0”™!2B@€ $¤”<C2A4>ˆ¤10ˆ‘!"FD„ˆDDˆ<44>Hd 1DDDDDpˆŽ¡:8„„Dˆ<44>H'À4@DDDDDpB4@0<101DDDDDp4@DDDDDpø‚|ÐL4@0„‚BL10„‚A
J(1DDDDDp„‚A
J(4@DDDDDpø‚AIH4@0€‚AIH10€‚B ‚Hˆ1DDDDDp€|| ‚ˆˆ4@DDDDDp4@0101DDDDDp4@DDDDDÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿô@?ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñDDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@DDDDDDDDDDDDDDDDDDDDDDDDDD@(0.75 (DISPLAY 1)) 0 0
This menu is not pop-up and remains on the display.
The items of a type menu:
These menus contain the names of all instances of a particular type on a file. Names of items in these menus can be copy selected.
Left buttoning on an item name pops up a menu of operations on that type:
ÿaDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDÿÿÿÿÿÿÿÿÿÿÑÿÿÿÿÿÿÿÿÿÿÑGÿÿÿÿÿÿÿÿÿÿÄDDDDDDDDDDDDDDDDDDDDGçÏÿÿÿÿÿÿÿÿÄDDDDDDDDDDDDDDDDDDDDçÏÿÿÿÿÿÿÿÿÑë®:<x¸éÿÿÿÑGë­ÙÛ·7eÿÿÿÄDDDDDDDDDDDDDDDDDDDDGíoÞ7°oÿÿÿÄDDDDDDDDDDDDDDDDDDDDílÛÙ··ïÿÿÿÑîíÛÛ·7oÿÿÿÑGîî+ÜX¸ïÿÿÿÄDDDDDDDDDDDDDDDDDDDDGÿÿÿÿ÷¿ÿÿÿÿÄDDDDDDDDDDDDDDDDDDDDÿÿÿÿøÿÿÿÿÑÿÿÿÿÿÿÿÿÿÿÑGÄDDDDDDDDDDDDDDDDDDDDGÄDDDDDDDDDDDDDDDDDDDDÑ€ÑG‚'ð@#ãà@ÄDDDDDDDDDDDDDDDDDDDDG €@$ ÄDDDDDDDDDDDDDDDDDDDD¢ €@$PÑ’ €ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñG’ €ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿôDDDDDDGŠ €ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿôDDDDDD† „~|ûøp>ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿý‚ „~|û÷·ÝîûÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýG>ºõï÷ÛöÿðéÿÿÿÿÿÿÿÿÿÿÿÿûÿÿüDG>ºõï÷Û÷ïgÏŸÃàÿÿÿÿÿ»ÿÿüD>Öîïð;÷÷ïoÏŸ~öû½ßÿÿÿÿ¿ÿÿý>Öàï÷Û÷ûïo×^½þû~ßþ:c ‡G<E280A1>G  ‚>îßw·Ýîûïo×^½þû~áýìíÙ]»{;tDG  Â>îßxwÞðïÚÝÝþ~þýíìñ»{{ŒD
(P¢?ÿÿÿÿÿÿÿÿÿÚÜþû~ÿ}ííûÍ»{{õ
(P’?ÿÿÿÿÿÿÿÿÿÝÛîöû½ß}ìíÛÝ»{{uG Hˆ’?ÿÿÿÿÿÿÿÿÿÝÛïûÃàþ;âˇ{ŒDG HøŠ0ÿÿÿÿÿÿÿÿýÿÿÿÿÿÿüD‰†pÿÿÿÿÿÿÿÿýÿÿÿÿÿÿý‰‚pG0 DG0>?Ÿßô$D0A <10>„@0€ B€„‹@/Gÿÿÿÿð€?B€„‹~#$DGÿÿÿÿð<C3BF> D@„S@!$D0<> GÀ„S@!$0C ˆ „#@#$DDDDDp=?‚ ƒâ##DDDDDDpD00DDDDDpDDDDDDpÁ€ÀDø€„D0Á€  D„€E0¢Ž.:8° %œÿD„´¹à¥DDDDDp¢‘1"FDÐ &¢DD„ÔÄ€TDDDDDDp”‡!B|€ Ä>D(ø„„€¤D0”™!2B@€  D(€„„€E0ˆ‘!"FD„ "D€„„€…DDDDDpˆŽ¡:8„ 3€„„`DDDDDDpBD0<`0DDDDDp€DDDDDDpø‚|ÐLð@€„D0„‚BL@E0„‚A
J)xq f\óž<C3B3>¥DDDDDp„‚A
J)„‰ ™"bDH<44>˜€TDDDDDDpø‚AII„<> >BAÈ<41><C388>€¤D0€‚AII„<>  BFH<46><48>€E0€‚B ‚H‰„‰"BDH<44><48>€…DDDDDp€|| ‚ˆ‰ðxpéB3¦<33>€DDDDDDpD00ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýDDDDDp4DDDDDDDDDDDÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿôDDDDDD?ÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿñDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD(0.75 (DISPLAY 1)) 0 0
Edit, brings up the source text of the item in a lisp editor.
PrettyPrint:
Show*, prints the source text of the item quickly.
Value, prints the global value of the item's name (assumed a symbol).
Function Def, prints the global function definition of the item's name (assumed a symbol).
Property List, prints the global property list of the item's name (assumed a symbol).
Documentation:
Documentation*, prints the item's documentation string.
Describe, calls describe on the item's name (assumed a symbol).
The menu of item operations shown above is the general one. There are special menus for the following types:
FNS, FUNCTIONS, RECORDS, VARS
Middle buttoning on an item name pops up a menu of generic operations on that type:
Ù}DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDÿÿÿÿÿÿÿÿÿÿÿÿÿDÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿþDDDDDÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýÿÿþDDDDÿÿÿÿÿÿÿÿÿð÷ÿÿÿÿÿÿÝÿÿÿùóÿÿÿÿÿÿÿïwÿÿÿÿÿÿßÿÿÿDùóÿÿÿÿÿÿÿß¡GŽŸ<0E>1…ãÆDDDDDúëŽ<C3AB>.:ÿß·;v^övì®Ý½<C39D>ºDDDDúëvvíÍÙÿß·{þöö
øݽ½Çû[Æ÷<C386>ìÿÿß·{~þööýæݽ½ûDû[6ömíûÿÿïw{vþövíîݽ½ºDDDDDû»vöíÍÛÿÿðù{Žÿ<0E>ñeýÆDDDDû»Š÷.;ÿÿÿÿÿÿÿþÿÿÿÿÿÿÿÿÿÿÿýïÿÿÿÿÿÿÿÿþÿÿÿÿÿÿÿDÿÿÿÿþÿÿÿDDDDDÿÿÿÿÿÿÿÿÿDDDDÀð@À@DÀqó€DDDDDÀ‰"D@DDDDÁ ‰üøøù>GÀÁ0ˆ  „<04> DDÁ(ˆ  „‰"D@DDDDDÁ$ˆ ÿÿÿÿðq3€ÿÿüDÁ$ˆ ÿÿÿÿÿÿýÁ"ˆ ÿÿÿÿÿÿýDÁ!ˆ!Ÿ>þ<03>ÿüDDÁ ˆ!Ÿ>ýí¾ÿüDÀ®½{ýø A ¾ÿýÀ®½{ý A ¾ÿýDÀµ»»ýéx¡ <03>ÿüDDÀµ¸;ýñ ¡ ¾ÿüDà <20>»·Ýí ! ¾ÿýÃ0<>»·Þ !ñ ¾ÿýDŠ(<28>ÿÿÿÿ" ÿÿüDDŠ$<24>ÿÿÿÿøé ÿÿüDÂR"$<24>ÿÿÿÿÿÿýÂR>"Œ
DÂ"A!œ DDÂ"A œ‚ DÀ ~B
À <0F>ç÷A¢
DÀ H…A\8³R DDÀ …A"bDÌ‘ª Dÿÿÿÿü À…~>BˆŸR
ÿÿÿÿü#È…A Bdˆ<64>¢
DDDDDL H…A"BDˆ‘B DDDDDDLÈ…AB:ˆŽ‚ DOà‡

DDDDDL DDDDDDL D`À
0``À ð
DDDDDL0`QGˆŽ  DDDDDDL(£‹‡QHH‘‰ D(¤LIJHEI
%!ÈCJHEI
DDDDDL%&HMDHB) DDDDDDL"$HIDG‚ D"#¨G ð

DDDDDL DDDDDDL D
> Ÿß!
DDDDDL! ‚@." DDDDDDL! ‚@!1" D! ‚@!!
> ‚@!!
DDDDDL ‚!!1 DDDDDDL ‚. D  
 0
DDDDDL DDDDDDL‚ D0`@B
ÿÿÿÿ0`@£ÿÿýDDDDDOÿÿÿÿ(£‹DSÿÿüDDDDDDDDDDE(¤MHªDDDD%!ÈPS%&Hh£DDDDDDDDDE"$HDBDDDDDDDDDDDDDE"#¨B‚DDDDDDDDDDDDDEDDDDDDDDDDDDDEDDDD €  € DDDDDDDDDE —aÅ¢DDDDDDDDDDDDDE ˜™’&¤DDDD <20>‘ä( <20>‘$4DDDDDDDDDE <20>‘$"DDDDDDDDDDDDDE‘Ô!DDDDDDDDDDDDDEÿÿÿÿÿÿÿÿÿÿÿÿþDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD(0.75 (DISPLAY 1)) 0 0
Delete, removes this item from its file.
EditAll, edits all occurances of this item's name in the latest source file (uses EDITCALLERS).
Rename:
Rename*, rename this item in its file and update all uses of the name.
CopyDef, copy this item under a new name.
Rename All, rename this item in *ALL* loaded files.
Move, move this item into another file.
Copy, copy this item into another file.
Mark:
Changed*, mark this item as changed by being edited.
Defined, mark this item as changed by being defined.
Deleted, mark this item as changed by being deleted.
Unmark, unmarks the source of this item as being changed (marks it "unchanged).
The file's makefile-environment has its readtable argument used to bring up thelisp structure editor properly on objects in the file. When SEdit is the lisp editor, the package used depends on SEdit's "correct package" heuristic (usually that of the symbol naming what is being edited).
Loading and controlling Manager:
Just load the file. Manager can be started either from the background menu or by calling the FNS MANAGER (see below).
Programmer's interface to Manager:
(MANAGER POSITION) [FNS]
Starts up the manager. If POSITION is given, the filelst menu will be appear there.
(MANAGER.RESET RESTARTFLG) [FNS]
Shuts down the manager. If RESTARTFLG is true, manager will be immediately restarted after the shutdown.
Manager.SORTFILELSTFLG [INITVAR]
If true, the FILELST will be sorted, without side effecting the actual FILELST variable. If unset, defaults to T.
Manager.MENUROWS [INITVAR]
Maximum number of rows in a manager menu. If unset, defaults to 20.
MANAGER-MARKED-SHADE [INITVAR]
The shade used to indicate that an item has been marked as changed. If unset, defaults to MENUBOLDFONT.
Manager.WINDOW-ANCHOR [INITVAR]
This selects which corner of the FILELST menu window remains anchored so that, as files are loaded, its growth will attempt to remain within the Medley screen.
It must be one of ANCHOR-TL, ANCHOR-TR, ANCHOR-BL, or ANCHOR-BR, where ANCHOR-BL is the default. These correspond to the Top Left, Top Right, Bottom Left, and Bottom Right corners, respectively.
__________________________________________
Change History
This is a history of edits made to the Manager. Please add your initials and a short description of what you changed to the END of the file. Be sure to include the name of the definition you modified.
andyiii- All menus are sorted now.
andyiii - Appropiate sub-menu update when something is changed that they contain.
andyiii- un-marking a file in the main menu now works and updates all the sub-menus of that file.
andyiii - added option to MAKEFILE menu item for files to write CommonLisp source using common-makefile.
andyiii - added commonlisp DESCRIBE for items
andyiii - Added a way to add files to the file managers main menu
andyiii - Can edit files property list from CHANGES menu
andyiii - Can now mark a whole file from main menu
andyiii - Can chose between TCOMPL (.LCOM files) and compile-file (.dfasl files) This is awkard since is uses the global variable *default-cleanup-compiler*
andyiii - Can get CommonLisp documentation string and descriptons
andyiii - Can now PrettyPrint a value, function def, or prop list and also show how the item would be written to a file
andyiii - Cleaned up specialized menus for FNS, FUNCTIONS, VARS and PROPS
andyiii - All dialog now goes through the MANAGER ACTIVITY WINDOW
RAF 7/31/87 - Fixed the rename option to not specify a source file, uses the ? search (core then file).
RAF 7/31/87 - Added an "edit all occurances of item's name" option to file relations menu.
RAF 7/31/87 - Manager.ACTIVEFLG is now a special that is bound by all advice to avoid redundant updates inside of themselves. This is a big speed improvement!
RAF 7/31/87 - Fixed Manager.HASITEM and Manager.HIGHLIGHT to use SASSOC, so that list items in menus get highlighted properly.
RAF 7/31/87 - Middle button on Manager file menu now brings up rename, etc. Used to bring up coms to edit (inconsistent).
RAF 7/31/87 - Main menu flashes if bad button/command is given.
RAF 8/4/87 - MANAGER-ADDTOFILES? now initialized to NIL, reducing redundant updates.
RAF 8/14/87 - In Manager.ALTERMARKING: removed extra code which tracked the files containing updated menus. Removed call to Manager.CHECKFILE. Made call to Manager.MAINUPDATE pass T if the reason for marking was DEFINED or DELETED; these cases also call Manager.COMSOPEN.
RAF 8/15/87 - In Manager.DO.COMMAND: moved binding of ACTIVITY-WINDOW-WAS-SHRUNK into the form eval'ed in the process where references are made. Moved setting of ACTIVITY-WINDOW-WAS-SHRUNK after the spot where its referent ACTIVITY-WINDOW is initialized.
RAF 8/16/87 - Advice for LOAD and LOADFNS now call Manager.CHECKFILE instead of Manager.MAINUPDATE (latter only does highlight updating, former can rebuild main menu). Advice for ADDTOFILES? now doesn't disable manager inside of its advised form, so that the ADDTOCOMS and DELFROMCOMS advice will work.
RAF 8/17/87 - Added Manager.FILELSTCHANGED? (which is tricky, since sorting in the main menu changes its order). Manager.CHECKFILE now tests whether the file being checked is in the main menu. If not the main menu is rebuilt. MANAGER fns disables manager around its call to UPDATEFILES. Manager.GETFILE takes a prompt argument (which is now passed in by Manager.DO.COMMAND).
RAF 8/18/87 - Manager.REMOVE.DUPLICATE.ADVICE now disables the manager when it manipulates the advice (to avoid animating the changes in the menus). The advice on LOAD and LOADFNS now call Manager.REMOVE.DUPLICATE.ADVICE.
RAF 8/20/87 - Fixed Manager.MAKEFILE.ADV to handle atomic cleanup options. Also made the top level Manager.RESET call take Manager.ACTIVEFLG, so that manager stays on when reloaded if it was on already. Manager.REMOVE.DUPLICATE.ADVICE now removes *all* duplicates of the first piece of advice (rather than only the second).
RAF 8/21/87 - Made MANAGER-WINDOWS be an initvar so that Manager.RESET from top level sees the right thing on first startup.
RAF 9/2/87 - Changed the manager shrunken bitmap to something more respectable. Added ADVISE and UNADVISE menu options for the ADVICE definer. Added a "Show all advice in effect" option to the manager main window middle button menu. Changed the messages printed out by Manager.DO.COMMAND to all use printout and lambdafont for highlighting.
RAF 9/3/87 - Added a clause in the startup fns MANAGER which reports when FILELST is empty and manager can't start. Also fixed a bug in where marking a file didn't bold the main menu entry (added an updatefiles in Manager.ALTERMARKING). Also caused the advice on the "redundant" call to (MARKASCHANGED :IN DEFAULT.EDITDEFA0001) to fire when FILELST is being edited (seems it was the only way to call markaschanged in that one case).
RAF 11/18/87 - Changed the call to EDITDEF in Manager.DO.COMMAND to include a :DONTWAIT option. The tracks a change in SEdit for the Mototwn release.
RAF 11/18/87 - Added some type checking to the sort testing function Manager.SORT.COMS so that it doesn't convert its arguments to strings unless they're not LITATOMS. This should make menu generation alot faster.
MTH 10/13/2023 - Added Manager.WINDOW-ANCHOR to anchor the window for keeping growth on screen. Added the ICON for the shrunken FILELST window. Moved previously conditional FILESLOAD operations to be always. Fixed a multiple-occurrence typo in the MasterScope database operations: LOADBFLG should be LOADDBFLG.(LIST ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "" "") STARTINGPAGE# 137) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "" "")) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL (PAPERSIZE NIL . LETTER) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO NIL) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))) (PAGE NIL (PAPERSIZE NIL . LETTER) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD CENTERED) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 10 FAMILY MODERN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO NIL) (174 36 288 36) NIL) (HEADING NIL (HEADINGTYPE RUNNINGHEAD) (84 744 528 36) NIL) (TEXT NIL NIL (84 96 456 600) NIL))))).È.È.5ÈÈT.È/T.5ÈÈT4ÈÈ4ÈÈ.È.ŠŠ8JÈÈ PAGEHEADING RUNNINGHEAD.ŠŠ8.MODERNCLASSICCLASSICMODERN MODERNMODERN
MODERN
MODERN


 HRULE.GETFNMODERN
 HRULE.GETFNMODERN
 HRULE.GETFNMODERN
   HRULE.GETFNMODERN  HRULE.GETFNMODERN  9 25 =
ï2
ò",W BMOBJ.GETFN5MODERN
É BMOBJ.GETFN54z™ BMOBJ.GETFN5MODERN
 Š ;M- 

BH1n
© BMOBJ.GETFN5MODERN
'5
%-8I2/3 6(
(%8;27-11 ;9 >8?x; BMOBJ.GETFN5MODERN
15B04[— BMOBJ.GETFN5MODERN
K
I BMOBJ.GETFN5MODERN
 4 „J = BMOBJ.GETFN5MODERN
 >
4G]W9An# T
É BMOBJ.GETFN5MODERN
 )`H+5((666P !y# 2

D!sEi  f+Ë#Rbi.B93<00>BxJBh[ {@U0{ßF}X³—×6†Õµzº
Reference in New Issue View Git Blame Copy Permalink