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.11 -r1.11.2.1
--- openacs-4/packages/dotlrn/www/admin/users-bulk-upload-2.tcl	23 Sep 2003 17:13:36 -0000	1.11
+++ openacs-4/packages/dotlrn/www/admin/users-bulk-upload-2.tcl	21 Feb 2004 02:36:51 -0000	1.11.2.1
@@ -96,14 +96,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] \