Index: openacs-4/packages/dotlrn/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/index.tcl,v diff -u -r1.26 -r1.27 --- openacs-4/packages/dotlrn/www/index.tcl 29 Mar 2002 19:14:46 -0000 1.26 +++ openacs-4/packages/dotlrn/www/index.tcl 2 Apr 2002 20:19:55 -0000 1.27 @@ -24,8 +24,6 @@ {filter ""} {page_num 0} } -properties { - admin_p:onevalue - admin_url:onevalue } # Check if this is a community type level thing @@ -43,8 +41,7 @@ # Make sure user is logged in set user_id [ad_maybe_redirect_for_registration] -set admin_p [dotlrn::admin_p] -set admin_url [dotlrn::get_url]/admin +# set admin_p [dotlrn::admin_p] # Permission dotLRN if {![dotlrn::user_can_browse_p]} { @@ -76,6 +73,6 @@ ad_script_abort } -set rendered_page [dotlrn::render_page -page_num $page_num -hide_links_p "t" $portal_id ] +set rendered_page [dotlrn::render_page -user_id $user_id -page_num $page_num -hide_links_p "t" $portal_id ] ad_return_template