Index: openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl	27 Oct 2014 16:38:55 -0000	1.7
+++ openacs-4/packages/acs-admin/www/apm/write-all-specs.tcl	7 Aug 2017 23:47:45 -0000	1.8
@@ -8,9 +8,10 @@
 
 set title "Generate Package Specifications"
 set context [list [list "." "Package Manager"] $title]
-set template [parameter::get -package_id [ad_conn subsite_id] -parameter StreamingHead] 
-ad_return_top_of_page [ad_parse_template -params [list context title] $template]
 
+ad_return_top_of_page [ad_parse_template \
+                           -params [list context title] \
+                           [template::streaming_template]]
 ns_write {
     Regenerating all package specifications for locally maintained packages.
     <ul>
@@ -41,3 +42,9 @@
 ns_write [subst {</ul>
 <a href="./">Return to the Package Manager</a>
 }]
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: