Index: openacs-4/packages/acs-kernel/acs-kernel.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/acs-kernel.info,v diff -u -r1.59 -r1.60 --- openacs-4/packages/acs-kernel/acs-kernel.info 25 Mar 2004 15:08:04 -0000 1.59 +++ openacs-4/packages/acs-kernel/acs-kernel.info 31 Mar 2004 21:45:40 -0000 1.60 @@ -7,7 +7,7 @@ t t - + Don Baccus Routines and data models providing the foundation for OpenACS-based Web services. 2004-03-10 @@ -18,7 +18,7 @@ 2 - + @@ -46,6 +46,7 @@ + Index: openacs-4/packages/acs-subsite/acs-subsite.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/acs-subsite.info,v diff -u -r1.64 -r1.65 --- openacs-4/packages/acs-subsite/acs-subsite.info 12 Mar 2004 13:45:18 -0000 1.64 +++ openacs-4/packages/acs-subsite/acs-subsite.info 31 Mar 2004 21:45:40 -0000 1.65 @@ -7,18 +7,18 @@ t f - + OpenACS Subsite 2004-03-10 OpenACS Provides for creating subsites within the OpenACS Community System. Aware of parties, groups, users, portraits. Can be themed via a per subsite master template. - - - - + + + + @@ -36,6 +36,7 @@ + Index: openacs-4/packages/acs-subsite/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/index.tcl,v diff -u -r1.19 -r1.20 --- openacs-4/packages/acs-subsite/www/index.tcl 30 Jan 2004 15:17:05 -0000 1.19 +++ openacs-4/packages/acs-subsite/www/index.tcl 31 Mar 2004 21:45:40 -0000 1.20 @@ -30,6 +30,16 @@ ad_script_abort } +# Handle IndexInternalRedirectUrl +set redirect_url [parameter::get -parameter IndexInternalRedirectUrl -default {}] +if { [empty_string_p $redirect_url] && $main_site_p } { + set redirect_url [parameter::get_from_package_key -package_key acs-kernel -parameter IndexInternalRedirectUrl] +} +if { ![empty_string_p $redirect_url] } { + rp_internal_redirect $redirect_url + ad_script_abort +} + set context [list] set package_id [ad_conn package_id] set admin_p [permission::permission_p -object_id $package_id -party_id [ad_conn untrusted_user_id] -privilege admin] Index: openacs-4/packages/acs-tcl/acs-tcl.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/acs-tcl.info,v diff -u -r1.34 -r1.35 --- openacs-4/packages/acs-tcl/acs-tcl.info 12 Mar 2004 13:45:31 -0000 1.34 +++ openacs-4/packages/acs-tcl/acs-tcl.info 31 Mar 2004 21:45:40 -0000 1.35 @@ -7,16 +7,16 @@ t t - + OpenACS The Kernel Tcl API library. 2004-03-10 OpenACS Contains all the core Tcl API, including the request processor, security and session management, permissions, site-nodes, package management infrastructure, etc. - + - +