Index: openacs-4/packages/chat-portlet/www/chat-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/chat-portlet/www/chat-portlet.tcl,v
diff -u -N -r1.8.2.4 -r1.8.2.5
--- openacs-4/packages/chat-portlet/www/chat-portlet.tcl	29 Mar 2023 15:47:01 -0000	1.8.2.4
+++ openacs-4/packages/chat-portlet/www/chat-portlet.tcl	29 Mar 2023 15:52:14 -0000	1.8.2.5
@@ -30,6 +30,15 @@
 
 array set config $cf
 set shaded_p $config(shaded_p)
+if {$shaded_p} {
+    #
+    # Nothing else to fetch here if the portlet is shaded. Just return
+    # the template.
+    #
+    ad_return_template
+    ad_script_abort
+}
+
 set chat_url "[ad_conn package_url]/chat/"
 
 set user_id [ad_conn user_id]
@@ -88,8 +97,6 @@
         }
     }
 
-ad_return_template
-
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4