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.8 -r1.332.2.9
--- openacs-4/packages/xowiki/tcl/package-procs.tcl	8 May 2019 14:33:40 -0000	1.332.2.8
+++ openacs-4/packages/xowiki/tcl/package-procs.tcl	8 May 2019 19:59:57 -0000	1.332.2.9
@@ -747,7 +747,7 @@
         set page [$package resolve_page -simple true $object_name __m]
         $package context $last_context
       }
-      $last_package_id set_url -url $last_url
+      ::$last_package_id set_url -url $last_url
 
     } else {
       #
@@ -1087,9 +1087,9 @@
       set m [:query_parameter m]
       if {$m in {list show-object file-upload}} {
         array set "" [list \
-                          name [${:folder_id} name] \
-                          stripped_name [${:folder_id} name] \
-                          parent_id [${:folder_id} parent_id] \
+                          name [::${:folder_id} name] \
+                          stripped_name [::${:folder_id} name] \
+                          parent_id [::${:folder_id} parent_id] \
                           item_id ${:folder_id} \
                           method [:query_parameter m]]
       } else {
@@ -1363,7 +1363,7 @@
         if {$target_item_id != 0} {
           #:msg "SYMLINK FIX $target_item_id set_resolve_context -package_id ${:id} -parent_id $parent_id"
           ::xo::db::CrClass get_instance_from_db -item_id $target_item_id
-          $target_item_id set_resolve_context -package_id ${:id} -parent_id $parent_id
+          ::$target_item_id set_resolve_context -package_id ${:id} -parent_id $parent_id
         }
         return $target_item_id
       }