Index: openacs-4/packages/acs-subsite/lib/subsites.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/subsites.tcl,v diff -u -N -r1.20 -r1.21 --- openacs-4/packages/acs-subsite/lib/subsites.tcl 11 Dec 2018 11:16:34 -0000 1.20 +++ openacs-4/packages/acs-subsite/lib/subsites.tcl 11 Dec 2018 11:20:45 -0000 1.21 @@ -1,11 +1,15 @@ -# @param admin_p - generate admin action links. +ad_include_contract { + UI includelet to show and create subsites. +} { +} set pretty_name [_ acs-subsite.subsite] set pretty_plural [_ acs-subsite.subsites] set untrusted_user_id [ad_conn untrusted_user_id] set subsite_id [ad_conn subsite_id] +# generate admin action links? set admin_p [permission::permission_p \ -object_id $subsite_id \ -privilege admin \