From 784107444496509b9b9bca00bded2a5e6b95875b Mon Sep 17 00:00:00 2001
From: Nick Briggs <nicholas.h.briggs@gmail.com>
Date: Sun, 17 May 2026 16:59:40 -0700
Subject: [PATCH] Globally enables XNS networking

Later, the result of (\ETHER-AVAILABLE) controls whether any networking
is turned on.
---
 internal/loadups/LOADUP-LISP      |  15 +++++++--------
 internal/loadups/LOADUP-LISP.LCOM | Bin 3674 -> 3671 bytes
 2 files changed, 7 insertions(+), 8 deletions(-)

diff --git a/internal/loadups/LOADUP-LISP b/internal/loadups/LOADUP-LISP
index 9d7dca17..9497dd39 100644
--- a/internal/loadups/LOADUP-LISP
+++ b/internal/loadups/LOADUP-LISP
@@ -1,14 +1,12 @@
-(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "XCL" BASE 10)
+(DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "XCL" :BASE 10)
 
-
(FILECREATED "26-Mar-2026 18:38:22" 
-|{DSK}<Users>briggs>Projects>medley>internal>loadups>LOADUP-LISP.;14|
 7604   
-
-      :EDIT-BY "briggs"
+
(FILECREATED "17-May-2026 12:28:45" 
+|{DSK}<Users>briggs>projects>medley>internal>loadups>LOADUP-LISP.;16|
 7600   
 
       :CHANGES-TO (FNS LOADUP-LISP)
 
-      :PREVIOUS-DATE "22-Feb-2026 14:15:31" 
-|{DSK}<Users>briggs>Projects>medley>internal>loadups>LOADUP-LISP.;13|)
+      :PREVIOUS-DATE "26-Mar-2026 18:38:22" 
+|{DSK}<Users>briggs>projects>medley>internal>loadups>LOADUP-LISP.;15|)
 
 
 (PRETTYCOMPRINT LOADUP-LISPCOMS)
@@ -138,6 +136,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 +150,5 @@
 (GLOBALVARS MAKESYSFILENAME MEDLEY-INIT-VARS MEDLEYDIR SYSTEMINITVARS USERRECLST)
 )
 (DECLARE\: DONTCOPY
-  (FILEMAP (NIL (695 7398 (LOADUP-LISP 705 . 7396)))))
+  (FILEMAP (NIL (670 7394 (LOADUP-LISP 680 . 7392)))))
 STOP
diff --git a/internal/loadups/LOADUP-LISP.LCOM b/internal/loadups/LOADUP-LISP.LCOM
index 2bbfe60e0452616843302c768ecc57ca17b25bae..6bb5db27ca7a7469297992e8396358180f5efc6b 100644
GIT binary patch
delta 447
zcmaKoF>As=7=}GtL;{7j6kHrWZfPPUBr%B+I`m8~8jOkLVrjueREl8L!KF0Cp>qfE
z2lPh>UHU@`{WZOFawxsw<9K<W<GJsr`d!_~J`KW{szDf0HH?D<+&=NTq)h>baYoZ9
zWPJ>7N{OG5R>b3bFXBOqFbamQNRljAj~6oP12!6JZ}hC1y6J#nx@Ob0EetXqFP~Pk
z`E&xy1z?c!7oT-sZ?>B=wA#LF8z)ydYag*q*Kk~27u~gh=hu@Q^4TH>ES%uDtZ5pC
zd@@>3dFQWZEUf(NSrVd_y}Lz~gOBax&~S7eT(3joHf3s-fE>gOq$nZ&psxxCg)b|m
zcVRMMs?Wc_t0DD(BYRgXvP%e{4#Q#0f~c(k`a~!Dx8es<X5&)1z|Ubkid#jD^MY)d
jHu!1S5{tG>ecw6#LKimlNSCq)7Ly*2>-zqx6qJ7fz5i{X

delta 419
zcmaKo&1%9x6onZPDS`{>qAgf^nN1UDLNbXzgl;Cu#0Fy&CxyDyDk4}d)?Fh$K^Kw-
zXx|~rK0;Sr75X%tNEa?j;jTW;Iegr&%6DZexy<uJrg(n96hHL3Q0-BtO<N4GA4aSn
z_`HXq+Go^_s2vD==L7=SlrzvZxmc94t|I~wa{-gO(iyH4qLDi2P0J8h!yw`N<-_A_
zJ{iMu0T_z$v&-9?>)p15db<~OYsRv`hT=^|zg=Q!rbU`rcAb^ym*W`X*&+t)-39?1
zhE-L?5RZrJiOBphV;Wfg*E9J*=X;SWGloW8Gr?l6A1U?#@MtxgPM?H_<=oJ)#kdl6
zLGnTl$s4L3lLKed(rcEXC!gqKzlMzDG{*}vpcLiOP3{#X7x}Xi0k`kl*)vVOk+S?d
VDii3?Hsb>x(vHBSk(LYI(GT@QYUKa`