From 25a3c02b41ff9ec52ec047d75af582d85697fcc5 Mon Sep 17 00:00:00 2001
From: Frank Halasz <frank@halasz.org>
Date: Mon, 27 Apr 2026 10:21:05 -0700
Subject: [PATCH] Remove PRINT debugging code from ShellOpen

---
 library/UNIXUTILS       |  16 ++++++++--------
 library/UNIXUTILS.DFASL | Bin 8147 -> 8128 bytes
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/library/UNIXUTILS b/library/UNIXUTILS
index c7cd0b08..76f08d72 100644
--- a/library/UNIXUTILS
+++ b/library/UNIXUTILS
@@ -1,6 +1,6 @@
 (DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10)
 
-
(FILECREATED "26-Apr-2026 22:53:52" {DSK}<home>frank>il>medley>library>UNIXUTILS.;4
 21786  
+
(FILECREATED "27-Apr-2026 10:15:21" {DSK}<home>frank>il>medley>library>UNIXUTILS.;6
 21771  
 
       :EDIT-BY "FGH"
 
@@ -148,7 +148,7 @@
                                                   "true"])
 
 (ShellOpen

-  [LAMBDA (FilenameOrURL)
                                    (* ; "Edited 26-Apr-2026 22:48 by FGH")


+  [LAMBDA (FilenameOrURL)
                                    (* ; "Edited 27-Apr-2026 10:14 by FGH")


                                                              (* ; "Edited 28-Dec-2025 18:26 by rmk")


                                                              (* ; "Edited 10-Sep-2025 15:29 by rmk")


                                                              (* ; "Edited  4-May-2025 11:14 by rmk")

@@ -222,8 +222,8 @@
                               (CL:WITH-OPEN-STREAM
                                (SHELLSTREAM (OPENSTREAM (CONCAT "{CORE}SHELLOUT" (RAND 1000 9999))
                                                    'BOTH))
-                               (ShellCommand
 (PRINT (CONCAT OPENER " '" UNIXFILE "'" 
-                                                           " >>/tmp/ShellOpener-warnings-$$.txt"))
+                               (ShellCommand
 (CONCAT OPENER " '" UNIXFILE "'" 
+                                                    " >>/tmp/ShellOpener-warnings-$$.txt")
                                       SHELLSTREAM)
                                (if
 (EQ (GETFILEPTR SHELLSTREAM)
                                        0)
@@ -373,8 +373,8 @@
 
 (PUTPROPS UNIXUTILS
 FILETYPE
 CL:COMPILE-FILE)
 (DECLARE%: DONTCOPY
-  (FILEMAP (NIL (1207 1580 (ShellCommand 1207 . 1580)) (1582 1979 (ShellWhich 1582 . 1979)) (2089 21708 
-(ShellBrowser 2099 . 3871) (ShellBrowse 3873 . 4558) (ShellOpener 4560 . 6248) (ShellOpen 6250 . 12212
-) (PROCESS-COMMAND 12214 . 12827) (SLASHIT 12829 . 16140) (UNIX-FILE-NAME 16142 . 20027) (
-UNIX-TMP-FILE-NAME 20029 . 21706)))))
+  (FILEMAP (NIL (1207 1580 (ShellCommand 1207 . 1580)) (1582 1979 (ShellWhich 1582 . 1979)) (2089 21693 
+(ShellBrowser 2099 . 3871) (ShellBrowse 3873 . 4558) (ShellOpener 4560 . 6248) (ShellOpen 6250 . 12197
+) (PROCESS-COMMAND 12199 . 12812) (SLASHIT 12814 . 16125) (UNIX-FILE-NAME 16127 . 20012) (
+UNIX-TMP-FILE-NAME 20014 . 21691)))))
 STOP
diff --git a/library/UNIXUTILS.DFASL b/library/UNIXUTILS.DFASL
index 9626abe19249bf8ba3f52f5e1467b577be9f2e5b..e6828da841912a7219b43bc68ffc13735ade08f9 100644
GIT binary patch
delta 636
zcmca?f53i1Xp9+GaDHh~a;idFW=^U?a#3nxNotCMk-4s8L6NSJfsvVlp@Eg5sg;o-
zmz!g-52`ZX{JfOJN*$nb1)%cG90iaD9jFcyi;Wxmn8mP|G_^;6qPiZV+2$6Oaz;jz
z&3{<=n1B>FhdmpUvEgPPzN^eqjd=_V@)7%k^BI631WbYnUe?JDLbF0m%-E}EmV3^a
z+9Ti};OZ9~66ERU4kTS2eeHmP+>Smz{>~6l6Cj_<-8IC`)5kR+BuH&$6VSwq@-y`%
zXVx&f043S{Lqh^WL)bDV+X`EWnwT?k00lXn{R1MMJsg9AfvRIC_Xz7ST29_6Y|a?D
z`J?b^MkZs^$@4_j7{5<GD(WNijhPv2>erbeOiT=nGec)gW(1)gW_Odxx?<*>-<TO8
z3O478-DR8{AR*4g$T>M#!kJNE@^XnxW#IsjG^4OFm=aJ1I)Ed_F#zZ@7b9_q)MjJJ
zjf{-4lb=eN%F4{NV`pSwnaMn3G7z!O^ad-D2a|G>&84k?#uiDNGAd18A>GZWHrYhR
zN?a4{aYijUpxMlRuHj%~87@t3l?halXJ!KHm4f(#QFdksBQvT$Oeg=6F=o`-tS74q
zaz%(-0HfXHrE;-4s?s2>3|oX|)_}r|)zif>#FZH&)C)FK8^r7YtGP5;Pks?|;Q#*s
D@G!H2

delta 648
zcmX?Lf7yOQXp9M0aDHh~a;idFW=^U?a#3nxNotCMk(sVzL6NSJfsvVlk&%_Dv6ZP2
zmz!g-52~`@(!7+!N*$nb1)%cG90iaDAQz~^#LCcU<HkN_F)Suc?a`m8uE%JyxrL>i
zk<obbA67mlAjQpL&&FhEx!H&BDzkiB9s`4X#QxxX1|SFllVF0E6(qnp*;;5;vauOQ
z6Ohv|v)pgS)E)u<09U`@kRVS#cOdEN=<5s=<aYG&@pp!ZS_1i8?yezjo<6PtAwk+R
zL7FeB%+!|yO0Wh1HHJvetYP#7^4R=CLjpoW*m5Up30sL8n=^6%1v#Dl10tP09D{;^
z`jRGB3hOZ1O<pE!&KS4(p73f$CL`m?-J)uYKPGPy^^y6`%nUaF+sqIqCI-ftp))2k
zf=~~$yYXZxF>}uE%#08Po1?_;GD`A+IE=htk_Sw3gGsK*0TRxPf|I96WGagUfQ3Yi
z!IYpf&`lgMjsZY#yBLW>q&6!^Ze(PXn|w*iR91GT9Xlff%S`4OlYxkJrZ-rL0+^Ja
ztRig%G&Ww^lu>!|ROxO;^~s7dR^nP}U}<eokTCnXhJ%e|xIDQ?CQwCznF%Z@4e=VI
z+{_S0W>l}4Onxq7%&5ItT2>Y03P-sBM*GQ=<YF1sCV!BV=g|R$cn8Q3ppnw@i<pD{
G{|5jIakDA_