Index: openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl,v
diff -u -r1.66.2.15 -r1.66.2.16
--- openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	15 Feb 2021 14:23:31 -0000	1.66.2.15
+++ openacs-4/packages/acs-bootstrap-installer/tcl/00-proc-procs.tcl	16 Feb 2021 02:31:33 -0000	1.66.2.16
@@ -1176,7 +1176,9 @@
     user provided values.
     
 } {
-    regsub {^~+/*} $arg1 {./} arg1
+    if {[string range $arg1 0 0] eq {~}} {
+        set arg1 ./$arg1
+    }
     ::file $subcmd $arg1 {*}$args
 }