Index: openacs-4/packages/dotlrn/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/index.tcl,v diff -u -r1.18 -r1.19 --- openacs-4/packages/dotlrn/www/index.tcl 11 Dec 2001 06:25:15 -0000 1.18 +++ openacs-4/packages/dotlrn/www/index.tcl 11 Jan 2002 21:51:51 -0000 1.19 @@ -40,18 +40,17 @@ # For now, we assume only ONE community (FIXME: ben) set the_community [lindex $communities 0] - ad_returnredirect [dotlrn_community::get_url_from_package_id -package_id [lindex $the_community 4]] + ad_returnredirect [dotlrn_community::get_url_from_package_id -package_id [lindex $the_community 4]] ad_script_abort - return } # Get the page set portal_id [dotlrn::get_workspace_portal_id $user_id] if {[empty_string_p $portal_id]} { ad_returnredirect index-not-a-user - return + ad_script_abort } set rendered_page [dotlrn::render_page $portal_id]