Index: openacs-4/packages/layout-managed-subsite/subsites.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/layout-managed-subsite/Attic/subsites.tcl,v diff -u -N --- openacs-4/packages/layout-managed-subsite/subsites.tcl 26 Nov 2008 11:10:22 -0000 1.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,36 +0,0 @@ -ad_page_contract { - - List acs-subsites and offer to convert them to mgh-subsites. - - @author Don Baccus (dhogaza@pacifier.com) - @creation-date - @cvs-id $Id: subsites.tcl,v 1.1 2008/11/26 11:10:22 donb Exp $ - -} - -db_multirow -extend {convert_url subsite_url} acs_subsites q { - select package_id as subsite_id - from apm_packages - where package_key = 'acs-subsite' - order by subsite_id -} { - set convert_url [export_vars -base convert-subsites {subsite_id}] - set subsite_url [site_node::get_url_from_object_id -object_id $subsite_id] -} - -template::list::create \ - -name acs_subsites \ - -multirow acs_subsites \ - -key subsite_id \ - -elements { - subsite_url { - label {Subsite URL} - } - convert { - label {Convert to a layout managed subsite} - link_url_col convert_url - link_html { title Convert class button } - display_template {Convert} - } - } -