Index: openacs-4/packages/dotlrn/www/admin/users-bulk-upload-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-bulk-upload-2.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/dotlrn/www/admin/users-bulk-upload-2.tcl	14 Nov 2003 22:11:24 -0000	1.12
+++ openacs-4/packages/dotlrn/www/admin/users-bulk-upload-2.tcl	20 Apr 2004 21:13:22 -0000	1.13
@@ -98,14 +98,8 @@
                 }
             }
             
-            if {$row(guest) == "f"} {
-                set inverse_row_guest "t"
-            } else {
-                set inverse_row_guest "f"
-            }
-            
             # Set the privacy
-            acs_privacy::set_user_read_private_data -user_id $user_id -object_id [dotlrn::get_package_id] -value $inverse_row_guest
+            dotlrn_privacy::set_user_guest_p -user_id $user_id -value $row(guest)
             
             doc_body_append [_ dotlrn.user_email_created [list user_email $row(email)]]
             set msg_subst_list [list system_name [ad_system_name] \