Index: openacs-4/packages/dotlrn/www/configure.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/configure.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/dotlrn/www/configure.tcl 13 Jul 2002 19:16:49 -0000 1.13 +++ openacs-4/packages/dotlrn/www/configure.tcl 14 Jul 2002 22:42:24 -0000 1.14 @@ -43,10 +43,12 @@ } else { # do i have access to my personal portal? - dotlrn::require_user_browse -user_id [ad_conn user_id] + set user_id [ad_conn user_id] - set portal_id [dotlrn::get_portal_id -user_id $user_id] + dotlrn::require_user_browse -user_id $user_id + set portal_id [dotlrn::get_portal_id -user_id $user_id] + set name [portal::get_name $portal_id] set rendered_page [portal::configure $portal_id "index"] }