Index: openacs-4/packages/dotlrn-ecommerce/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/www/index.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/dotlrn-ecommerce/www/index.tcl	31 Jan 2006 02:52:43 -0000	1.6
+++ openacs-4/packages/dotlrn-ecommerce/www/index.tcl	13 Jun 2006 17:03:12 -0000	1.7
@@ -11,10 +11,7 @@
 set user_id [ad_conn user_id]
 
 if { $user_id } {
-    if { ! [dotlrn::user_p -user_id $user_id] } {
-	dotlrn::user_add -user_id $user_id
-	dotlrn_privacy::set_user_guest_p -user_id $user_id -value f
-    }
+    dotlrn_ecommerce::check_user -user_id $user_id
 }
 
 if {[permission::permission_p -party_id $user_id -object_id $cc_package_id -privilege "create"]} {