Index: openacs-4/packages/xowiki/tcl/folder-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/folder-procs.tcl,v diff -u -N -r1.55.2.44 -r1.55.2.45 --- openacs-4/packages/xowiki/tcl/folder-procs.tcl 4 Nov 2020 18:21:21 -0000 1.55.2.44 +++ openacs-4/packages/xowiki/tcl/folder-procs.tcl 5 Nov 2020 13:53:36 -0000 1.55.2.45 @@ -672,6 +672,7 @@ -object_types [:types_to_show] \ -extra_where_clause $extra_where_clause] + set package_id [::xo::cc package_id] set pkg ::$package_id set url [::xo::cc url] $pkg get_lang_and_name -default_lang "" -name [$current_folder name] lang name Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -N -r1.542.2.91 -r1.542.2.92 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 4 Nov 2020 13:25:38 -0000 1.542.2.91 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 5 Nov 2020 13:53:36 -0000 1.542.2.92 @@ -3316,7 +3316,7 @@ if {![info exists package_id]} { set package_id ${:package_id} } if {![info exists parent_id]} { set parent_id ${:parent_id} } if {$creation_user eq ""} { - xo::ConnectionContext require + ::xo::ConnectionContext require -package_id $package_id set creation_user [[::$package_id context] user_id] }