Index: openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl,v
diff -u -r1.189.2.50 -r1.189.2.51
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	13 May 2020 08:07:28 -0000	1.189.2.50
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	13 May 2020 08:32:05 -0000	1.189.2.51
@@ -1689,7 +1689,7 @@
                         -port [expr {[dict exists $components port] ? [dict get $components port] : ""}] \
                        ]
         set fullpath [dict get $components path]/[dict get $components tail]
-        append result / [ad_urlencode_folder_path $fullpath]
+        append result [ad_urlencode_folder_path $fullpath]
     } else {
         set result [ad_urlencode_folder_path $url]
     }