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.140.2.66 -r1.140.2.67 --- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 28 Mar 2017 06:46:51 -0000 1.140.2.66 +++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl 28 Mar 2017 14:39:57 -0000 1.140.2.67 @@ -2455,10 +2455,9 @@ set url [util_current_location]$target_url } else { # URL is relative to current directory. - if {$target_url eq "."} { - set url [util_current_location][util_current_directory] - } else { - set url [util_current_location][util_current_directory]$target_url + set url [util_current_location][ad_urlencode_folder_path [util_current_directory]] + if {$target_url ne "."} { + append url $target_url } }