Index: openacs-4/packages/chat/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/index.tcl,v
diff -u -N -r1.18.2.2 -r1.18.2.3
--- openacs-4/packages/chat/www/index.tcl	15 Mar 2019 17:30:42 -0000	1.18.2.2
+++ openacs-4/packages/chat/www/index.tcl	15 Mar 2019 17:34:47 -0000	1.18.2.3
@@ -24,8 +24,10 @@
     lappend actions "#chat.Create_a_new_room#" room-edit "#chat.Create_a_new_room#"
 }
 
+set base_url [site_node::get_url_from_object_id -object_id $package_id]
+
 db_multirow -extend {
-    active_users last_activity room_url base_url
+    active_users last_activity room_url
 } rooms rooms_list {
     select rm.room_id,
            rm.pretty_name,
@@ -42,7 +44,6 @@
       and obj.context_id = :package_id
     order by rm.pretty_name
 } {
-    set base_url [site_node::get_url_from_object_id -object_id $context_id]
     set room [::chat::Chat create new -volatile -chat_id $room_id]
     set active_users [$room nr_active_users]
     set last_activity [$room last_activity]
@@ -100,7 +101,7 @@
             display_template {
                 <a href="chat-transcripts?room_id=@rooms.room_id@" class=button>#chat.Transcripts#</a>
                 <if @room_create_p;literal@ true>
-                <a href="@rooms.base_url@room?room_id=@rooms.room_id@" class=button>#chat.room_admin#</a>
+                <a href="${base_url}@room?room_id=@rooms.room_id@" class=button>#chat.room_admin#</a>
                 </if>
             }
         }