Index: openacs-4/packages/dotlrn/www/one-community-portal-template-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/Attic/one-community-portal-template-2.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn/www/one-community-portal-template-2.tcl 28 Nov 2001 20:45:05 -0000 1.1 @@ -0,0 +1,18 @@ +# /dotlrn/www/admin/one-instance-portal-template-2.tcl +ad_page_contract { + Form target for the Configuration page for an instance's portal template + + @author Arjun Sanyal (arjun@openforce.net) + @cvs-id $Id: one-community-portal-template-2.tcl,v 1.1 2001/11/28 20:45:05 oracle Exp $ +} { } + +set form [ns_getform] +set portal_id [ns_set get $form portal_id] +set return_url [ns_set get $form return_url] + +set user_id [ad_conn user_id] + +portal::template_configure_dispatch $portal_id $form + +ns_returnredirect "one-community-portal-template?portal_id=$portal_id&return_url=$return_url" + Index: openacs-4/packages/dotlrn/www/one-community-portal-template.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/Attic/one-community-portal-template.adp,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn/www/one-community-portal-template.adp 28 Nov 2001 20:45:05 -0000 1.1 @@ -0,0 +1,5 @@ + +Configure this instance's template +

+ +@rendered_page@ Index: openacs-4/packages/dotlrn/www/one-community-portal-template.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/Attic/one-community-portal-template.tcl,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/dotlrn/www/one-community-portal-template.tcl 28 Nov 2001 20:45:05 -0000 1.1 @@ -0,0 +1,14 @@ +# /dotlrn/www/admin/one-instance-portal-template.tcl +ad_page_contract { + Configuration page for an instance's portal template + + @author Arjun Sanyal (arjun@openforce.net) + @cvs-id $Id: one-community-portal-template.tcl,v 1.1 2001/11/28 20:45:05 oracle Exp $ +} { + portal_id:naturalnum,notnull + return_url:notnull +} + +set rendered_page [portal::template_configure $portal_id $return_url] + +ad_return_template