Index: openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl	14 Jan 2005 14:52:03 -0000	1.1
+++ openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl	10 Jan 2007 21:22:11 -0000	1.2
@@ -9,7 +9,7 @@
 set page_title  "\"#acs-subsite.Change_my_email_P\#\""
 set context [list [list [ad_pvt_home] [ad_pvt_home_name]] $page_title]
 
-if { [string equal $user_id ""] } {
+if {$user_id eq ""} {
     set user_id [auth::require_login -account_status closed]
 }