Index: openacs-4/packages/ecommerce/www/admin/customer-service/user-identification.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/customer-service/user-identification.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/ecommerce/www/admin/customer-service/user-identification.tcl 20 Apr 2001 20:51:14 -0000 1.1 +++ openacs-4/packages/ecommerce/www/admin/customer-service/user-identification.tcl 9 Mar 2002 02:00:02 -0000 1.2 @@ -110,7 +110,7 @@ # if their email address was filled in, see if they're a registered user if { ![empty_string_p $email] } { set email [string toupper $email] - set row_exists_p [db_0or1row get_row_exists_name "select first_names as d_first_names, last_name as d_last_name, user_id as d_user_id from cc_users where upper(email) = :email"] + set row_exists_p [db_0or1row get_row_exists_name "select first_names as d_first_names, last_name as d_last_name, user_id as d_user_id from cc_users where email = lower(:email)"] if { [info exists d_user_id] } { append doc_body "
  • This is a registered user of the system: $d_first_names $d_last_name.