Index: openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl,v
diff -u -N -r1.10 -r1.11
--- openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl	31 Aug 2005 09:01:01 -0000	1.10
+++ openacs-4/packages/dotlrn-ecommerce/lib/user-info.tcl	1 Oct 2005 21:44:40 -0000	1.11
@@ -262,6 +262,7 @@
     category::map_object -remove_old -object_id $user_id [list $grade]
 
     dotlrn::user_add -user_id $user_id
+    dotlrn_privacy::set_user_guest_p -user_id $user_id -value f	
 } -after_submit {
     if { [string equal [ad_conn account_status] "closed"] } {
         auth::verify_account_status