Index: openacs-4/packages/dotlrn-ecommerce/www/register/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/register/index.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn-ecommerce/www/register/index.tcl 20 Jul 2005 03:22:36 -0000 1.2
+++ openacs-4/packages/dotlrn-ecommerce/www/register/index.tcl 1 Oct 2005 21:44:39 -0000 1.3
@@ -38,6 +38,8 @@
# FIXME : put some error handling here
# make sure user is an approved dotlrn user
dotlrn::user_add -user_id $user_id
+ dotlrn_privacy::set_user_guest_p -user_id $user_id -value f
+
# register the user
dotlrn_community::add_user $community_id $user_id
set reg_message "Thank you for registering....
Placeholder for complete message"