diff --git a/library/UNIXUTILS b/library/UNIXUTILS
index d8dce663..c7cd0b08 100644
--- a/library/UNIXUTILS
+++ b/library/UNIXUTILS
@@ -1,12 +1,12 @@
 (DEFINE-FILE-INFO :PACKAGE "INTERLISP" :READTABLE "INTERLISP" :BASE 10)
 
-(FILECREATED "31-Mar-2026 00:14:19" {WMEDLEY}<library>UNIXUTILS.;58 21269  
+(FILECREATED "26-Apr-2026 22:53:52" {DSK}<home>frank>il>medley>library>UNIXUTILS.;4 21786  
 
-      :EDIT-BY rmk
+      :EDIT-BY "FGH"
 
-      :CHANGES-TO (FNS UNIX-FILE-NAME)
+      :CHANGES-TO (FNS ShellOpen SLASHIT)
 
-      :PREVIOUS-DATE "29-Mar-2026 00:26:43" {WMEDLEY}<library>UNIXUTILS.;57)
+      :PREVIOUS-DATE "31-Mar-2026 00:14:19" {DSK}<home>frank>il>medley>library>UNIXUTILS.;3)
 
 
 (PRETTYCOMPRINT UNIXUTILSCOMS)
@@ -148,7 +148,8 @@
                                                   "true"])
 
 (ShellOpen
-  [LAMBDA (FilenameOrURL)                                    (* ; "Edited 28-Dec-2025 18:26 by rmk")
+  [LAMBDA (FilenameOrURL)                                    (* ; "Edited 26-Apr-2026 22:48 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")
 
@@ -210,7 +211,8 @@
                                                        'NAME NEWNAME 'EXTENSION EXTENSION))
                                (TARGETFILE.UNIX (SLASHIT (PACKFILENAME.STRING 'HOST NIL 'DIRECTORY 
                                                                 TMPDIR 'NAME NEWNAME 'EXTENSION 
-                                                                EXTENSION)))
+                                                                EXTENSION)
+                                                       NIL NIL NIL T))
                                (UNIXFILE NIL))
                               (DECLARE (SPECVARS UNIXFILE))
                               (if (OR VERSION.SPECIFIED (NOT UNVERSIONED.EXISTS))
@@ -220,8 +222,8 @@
                               (CL:WITH-OPEN-STREAM
                                (SHELLSTREAM (OPENSTREAM (CONCAT "{CORE}SHELLOUT" (RAND 1000 9999))
                                                    'BOTH))
-                               (ShellCommand (CONCAT OPENER " '" UNIXFILE "'" 
-                                                    " >>/tmp/ShellOpener-warnings-$$.txt")
+                               (ShellCommand (PRINT (CONCAT OPENER " '" UNIXFILE "'" 
+                                                           " >>/tmp/ShellOpener-warnings-$$.txt"))
                                       SHELLSTREAM)
                                (if (EQ (GETFILEPTR SHELLSTREAM)
                                        0)
@@ -245,7 +247,8 @@
                                                  0))) DO (BLOCK) FINALLY (RETURN CODE])
 
 (SLASHIT
-  [LAMBDA (X LCASEDIRS NOHOST KEEPDOT)                       (* ; "Edited 17-Jan-2026 23:15 by rmk")
+  [LAMBDA (X LCASEDIRS NOHOST KEEPDOT NO.QUOTE.SPACE)        (* ; "Edited 26-Apr-2026 22:48 by FGH")
+                                                             (* ; "Edited 17-Jan-2026 23:15 by rmk")
                                                              (* ; "Edited  4-Nov-2025 10:10 by rmk")
                                                              (* ; "Edited 22-Oct-2025 13:05 by rmk")
                                                              (* ; "Edited 25-Sep-2025 09:57 by rmk")
@@ -258,7 +261,10 @@
     (* ;; "This is a first approximation to a utility that converts a filename X on a host whose files physically reside in the local Unix file system into the strings that shell commands can use to reference that file.  For now, this just involves replacing directory brackets with /, removing the host, perhaps lower-casing the directory, and perhaps removing a final dot.  It probably should be extended to deal with version number translation, for now it just keeps the ; version. ")
 
     (LET [LASTDIRPOS SLASHED (DIRPOS (ADD1 (OR (STRPOS "}" X)
-                                               0]
+                                               0)))
+                (REPLACE.SPACE (if NO.QUOTE.SPACE
+                                   then (CONS (CHARCODE SPACE))
+                                 else (APPEND (CHARCODE (\ SPACE]
          [SETQ SLASHED (CONCATCODES (for I C from DIRPOS while (SETQ C (NTHCHARCODE X I))
                                        join (SELCHARQ C
                                                  ((< >) 
@@ -266,7 +272,7 @@
                                                       (CONS (CHARCODE /)))
                                                  (/ (SETQ LASTDIRPOS I)
                                                     (CONS C))
-                                                 (SPACE (APPEND (CHARCODE (\ SPACE))))
+                                                 (SPACE REPLACE.SPACE)
                                                  (CONS C]
          (CL:WHEN (AND LCASEDIRS LASTDIRPOS)
              (SETQ LASTDIRPOS (ADD1 (IDIFFERENCE LASTDIRPOS DIRPOS)))
@@ -367,8 +373,8 @@
 
 (PUTPROPS UNIXUTILS FILETYPE CL:COMPILE-FILE)
 (DECLARE%: DONTCOPY
-  (FILEMAP (NIL (1170 1543 (ShellCommand 1170 . 1543)) (1545 1942 (ShellWhich 1545 . 1942)) (2052 21191 
-(ShellBrowser 2062 . 3834) (ShellBrowse 3836 . 4521) (ShellOpener 4523 . 6211) (ShellOpen 6213 . 11982
-) (PROCESS-COMMAND 11984 . 12597) (SLASHIT 12599 . 15623) (UNIX-FILE-NAME 15625 . 19510) (
-UNIX-TMP-FILE-NAME 19512 . 21189)))))
+  (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)))))
 STOP
diff --git a/library/UNIXUTILS.DFASL b/library/UNIXUTILS.DFASL
index f4489675..9626abe1 100644
Binary files a/library/UNIXUTILS.DFASL and b/library/UNIXUTILS.DFASL differ
