Index: openacs-4/packages/openacs-bootstrap5-theme/resources/masters/plain-streaming-head.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-bootstrap5-theme/resources/masters/plain-streaming-head.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/packages/openacs-bootstrap5-theme/resources/masters/plain-streaming-head.tcl	1 Apr 2022 13:38:22 -0000	1.1.2.1
+++ openacs-4/packages/openacs-bootstrap5-theme/resources/masters/plain-streaming-head.tcl	21 Jun 2022 17:23:15 -0000	1.1.2.2
@@ -1,14 +1,11 @@
 set streaming_head 1
 
-if {![info exists subsite_link]} {
-    set subsite_link "/"
-}
-
 if {![info exists title]}      { set title       [ad_system_name]   }
 if {![info exists doc(title)]} { set doc(title)  $title   }
 if {[info exists context]}     { set context_bar [ad_context_bar {*}$context]}
 
-set subsite_url [subsite::get_element -element url]
+set subsite_id [ad_conn subsite_id]
+set subsite_url [subsite::get_element -subsite_id $subsite_id -element url]
 set subsite_name [lang::util::localize [subsite::get_element -element instance_name]]
 
 # Local variables: