Index: openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl	27 Jun 2018 16:11:45 -0000	1.5
+++ openacs-4/packages/openacs-default-theme/lib/plain-streaming-head.tcl	3 Sep 2024 15:37:40 -0000	1.6
@@ -1,13 +1,18 @@
-# The streaming head template provides means for styling streaming
-# HTML output and supports the standard title and navigation bar
-# conventions.  It can be used e.g. like in the following:
-#
-# set title "Contents of Loaded Package"
-# set context [list [list "." "Package Manager"] [list "package-load" "Load a New Package"] $title]
-# ad_return_top_of_page [ad_parse_template -params [list context title] \
-#			   "/packages/openacs-default-theme/lib/plain-streaming-head"]
-#
-#
+ad_include_contract {
+    The streaming head template provides means for styling streaming
+    HTML output and supports the standard title and navigation bar
+    conventions.  It can be used e.g. like in the following:
+
+    set title "Contents of Loaded Package"
+    set context [list [list "." "Package Manager"] [list "package-load" "Load a New Package"] $title]
+    ad_return_top_of_page [ad_parse_template -params [list context title] \
+                               "/packages/openacs-default-theme/lib/plain-streaming-head"]
+
+    Note that as 'title' and 'context' are meant to be passed to the
+    template via the idiom above, defining them via the
+    include_contract is currently not supported.
+}
+
 set separator :
 set system_name [ad_system_name]
 set untrusted_user_id [ad_conn untrusted_user_id]