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.46 -r1.189.2.47
--- openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	17 Dec 2019 16:53:18 -0000	1.189.2.46
+++ openacs-4/packages/acs-tcl/tcl/utilities-procs.tcl	13 Jan 2020 15:12:50 -0000	1.189.2.47
@@ -1042,6 +1042,7 @@
 
     # Prepend with the base URL
     if { [info exists base] && $base ne "" } {
+        set base [string trimright $base "?"]
         if { [string first ? $base] > -1 } {
             # The base already has query vars; assume that the
             # path up to this point is already correctly encoded.