Index: openacs-4/packages/dotlrn-ecommerce/lib/user-new.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/user-new.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/dotlrn-ecommerce/lib/user-new.tcl 1 Aug 2005 00:06:57 -0000 1.9 +++ openacs-4/packages/dotlrn-ecommerce/lib/user-new.tcl 18 Aug 2005 08:52:06 -0000 1.10 @@ -58,7 +58,8 @@ set allow_no_email_p [parameter::get -parameter AllowNoEmailForPurchaser] set validate [list] -if { $user_type == "purchaser" && $allow_no_email_p } { +# if { $user_type == "purchaser" && $allow_no_email_p } { } +if { $allow_no_email_p } { for { set i 0 } { $i < $formlen } { incr i } { set field [lindex $form $i] if { [lindex $field 0] == "email:text(text)" } {