Index: openacs-4/packages/xowiki/tcl/chat-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/chat-procs.tcl,v
diff -u -N -r1.31 -r1.32
--- openacs-4/packages/xowiki/tcl/chat-procs.tcl	1 Oct 2018 13:18:09 -0000	1.31
+++ openacs-4/packages/xowiki/tcl/chat-procs.tcl	1 Oct 2018 17:22:49 -0000	1.32
@@ -17,9 +17,8 @@
     if {[ad_conn package_key] eq "xowiki"} {
       set xowiki_package_id [ad_conn package_id]
     } else {
-      set main_node_id [site_node::get_node_id -url "/"]
-      set xowiki_package_id [lindex [apm_package_ids_from_key \
-                                         -package_key xowiki -mounted] 0]
+      set xowiki_package_id [::xowiki::Package first_instance -privilege read \
+                                 -party_id [ad_conn user_id]]
     }
 
     if {![info exists package_id]} {