Index: openacs-4/packages/acs-subsite/www/admin/subsite-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/subsite-add.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/acs-subsite/www/admin/subsite-add.tcl 10 Oct 2003 11:34:51 -0000 1.7 +++ openacs-4/packages/acs-subsite/www/admin/subsite-add.tcl 11 Dec 2003 21:39:55 -0000 1.8 @@ -1,5 +1,5 @@ ad_page_contract { - Create and mount a new Subsite/Community. + Create and mount a new Subsite @author Steffen Tiedemann Christensen (steffen@christensen.name) @creation-date 2003-09-26 @@ -9,31 +9,27 @@ auth::require_login -if { [string equal [ad_conn package_url] "/"] } { - set page_title "New community" - set subsite_pretty_name "Community name" -} else { - set page_title "New subcommunity" - set subsite_pretty_name "Subcommunity name" -} +set page_title "New subsite" +set subsite_pretty_name "Subsite name" + set context [list $page_title] ad_form -name subsite -cancel_url . -form { {node_id:key} {instance_name:text {label $subsite_pretty_name} - {help_text "The name of the new community you're setting up."} + {help_text "The name of the new subsite you're setting up."} {html {size 30}} } - {folder:text,optional + {folder:url_element(text),optional {label "URL folder name"} {help_text "This should be a short string, all lowercase, with hyphens instead of spaces, whicn will be used in the URL of the new application. If you leave this blank, we will generate one for you from name of the application."} {html {size 30}} } {master_template:text(select) {label "Template"} - {help_text "Choose the layout and navigation you want for your community."} + {help_text "Choose the layout and navigation you want for your subsite."} {options [subsite::get_template_options]} } {visibility:text(select) @@ -81,7 +77,7 @@ } } on_error { - ad_return_error "Problem Creating Application" "We had a problem creating the community." + ad_return_error "Problem Creating Application" "We had a problem creating the subsite." } } -after_submit { ad_returnredirect ../$folder