diff --git a/internal/loadups/LOADUP-LISP b/internal/loadups/LOADUP-LISP index b681d3ac..b766256d 100644 --- a/internal/loadups/LOADUP-LISP +++ b/internal/loadups/LOADUP-LISP @@ -1,12 +1,14 @@ (DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "XCL" :BASE 10) -(FILECREATED "16-Apr-2026 09:06:26" |{WMEDLEY}loadups>LOADUP-LISP.;32| 7864 +(FILECREATED "18-May-2026 17:55:46"  +|{DSK}briggs>projects>medley>internal>loadups>LOADUP-LISP.;20| 8046 - :EDIT-BY |rmk| + :EDIT-BY |nhb| :CHANGES-TO (FNS LOADUP-LISP) - :PREVIOUS-DATE "15-Apr-2026 23:27:22" |{WMEDLEY}loadups>LOADUP-LISP.;31|) + :PREVIOUS-DATE "16-Apr-2026 09:06:26" +|{DSK}briggs>projects>medley>internal>loadups>LOADUP-LISP.;19|) (PRETTYCOMPRINT LOADUP-LISPCOMS) @@ -19,7 +21,8 @@ (DEFINEQ (LOADUP-LISP - (LAMBDA (DRIBBLEFILE) (* \; "Edited 16-Apr-2026 09:06 by rmk") + (LAMBDA (DRIBBLEFILE) (* \; "Edited 18-May-2026 17:55 by nhb") + (* \; "Edited 16-Apr-2026 09:06 by rmk") (* \; "Edited 5-Apr-2026 21:35 by rmk") (* \; "Edited 26-Mar-2026 18:38 by briggs") (* \; "Edited 22-Feb-2026 14:15 by rmk") @@ -138,6 +141,7 @@ (LOADUP '(PUP 10MBDRIVER LEAF LLETHER DPUPFTP LOCALFILE DSKDISPLAY COURIER LLNS TRSERVER SPP NSPRINT AUTHENTICATION BSP CLEARINGHOUSE NSFILING MAIKOETHER)) + (SETQ \\NSFLG T) (RESTART.ETHER) (DRIBBLE) (SETQ MAKESYSNAME :MEDLEY))) @@ -151,5 +155,5 @@ (GLOBALVARS MAKESYSFILENAME MEDLEY-INIT-VARS MEDLEYDIR SYSTEMINITVARS USERRECLST) ) (DECLARE\: DONTCOPY - (FILEMAP (NIL (640 7658 (LOADUP-LISP 650 . 7656))))) + (FILEMAP (NIL (692 7840 (LOADUP-LISP 702 . 7838))))) STOP diff --git a/internal/loadups/LOADUP-LISP.LCOM b/internal/loadups/LOADUP-LISP.LCOM index e13f8ab0..0f622ebf 100644 Binary files a/internal/loadups/LOADUP-LISP.LCOM and b/internal/loadups/LOADUP-LISP.LCOM differ