Index: openacs-4/packages/xowiki/tcl/package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v
diff -u -N -r1.332.2.40 -r1.332.2.41
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	3 Nov 2019 18:37:44 -0000	1.332.2.40
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	25 Nov 2019 11:09:42 -0000	1.332.2.41
@@ -910,7 +910,8 @@
         #
         lappend args [list m $method]
       }
-      set computed_link [uplevel export_vars -base [list $base] [list $args]]
+      #set computed_link [uplevel export_vars -base [list $base] -no_base_encode [list $args]]
+      set computed_link [uplevel [list export_vars -base $base -no_base_encode $args]]
       #:msg "computed_link = '$computed_link'"
     }
     if {$with_entities} {