Index: openacs-4/packages/acs-lang/www/admin/test/show.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-lang/www/admin/test/show.tcl,v
diff -u -N -r1.2 -r1.2.2.1
--- openacs-4/packages/acs-lang/www/admin/test/show.tcl	7 Aug 2017 23:47:57 -0000	1.2
+++ openacs-4/packages/acs-lang/www/admin/test/show.tcl	19 Dec 2019 15:54:02 -0000	1.2.2.1
@@ -1,4 +1,10 @@
-set file [ns_queryget file]
+ad_page_contract {
+    This page will read any file in its same local directory and
+    display the result as HTML. Apparently a leftover from around 2002
+    and the GreenPeace times.
+} {
+    file:notnull
+}
 
 if { [regexp {\.\.|^/} $file] } {
 
Index: openacs-4/packages/acs-service-contract/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-service-contract/www/index.tcl,v
diff -u -N -r1.11.2.1 -r1.11.2.2
--- openacs-4/packages/acs-service-contract/www/index.tcl	19 Dec 2019 16:00:02 -0000	1.11.2.1
+++ openacs-4/packages/acs-service-contract/www/index.tcl	19 Dec 2019 16:02:30 -0000	1.11.2.2
@@ -1,3 +1,7 @@
+ad_page_contract {
+    Index page. Display the various kinds of service contracts.
+}
+
 set context [list]
 
 db_multirow defined_contracts defined_contracts {