Index: openacs-4/packages/acs-subsite/www/pvt/home.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/home.tcl,v diff -u -r1.17.4.1 -r1.17.4.2 --- openacs-4/packages/acs-subsite/www/pvt/home.tcl 17 Dec 2004 16:07:43 -0000 1.17.4.1 +++ openacs-4/packages/acs-subsite/www/pvt/home.tcl 17 Dec 2004 17:26:54 -0000 1.17.4.2 @@ -77,13 +77,6 @@ } -# Check if the ShowEmailP parameter is set to 1 to show the link refered to Hide/Show Email -set show_email_p [parameter::get_from_package_key -package_key acs-subsite -parameter ShowEmailP -default 1] - -# The users table has a field where the user can especify to show his/her email -# or not. -db_1row show_email_info { } - set whos_online_url "[subsite::get_element -element url]shared/whos-online" set make_visible_url "[subsite::get_element -element url]shared/make-visible" set make_invisible_url "[subsite::get_element -element url]shared/make-invisible"