Index: openacs-4/packages/acs-subsite/lib/home.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/home.tcl,v diff -u -r1.3 -r1.3.8.1 --- openacs-4/packages/acs-subsite/lib/home.tcl 7 Jan 2010 11:41:35 -0000 1.3 +++ openacs-4/packages/acs-subsite/lib/home.tcl 22 Aug 2015 10:14:04 -0000 1.3.8.1 @@ -20,13 +20,12 @@ member_link:onevalue pvt_home_url:onevalue } - +set login_url [ad_get_login_url] set user_id [auth::require_login -account_status closed] acs_user::get -array user -include_bio -user_id $user_id set account_status [ad_conn account_status] -set login_url [ad_get_login_url] set subsite_url [ad_conn vhost_subsite_url] set page_title [ad_pvt_home_name]