Index: openacs-4/packages/dotlrn/www/admin/users-chunk-medium-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-chunk-medium-postgresql.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/www/admin/users-chunk-medium-postgresql.xql	29 May 2003 18:05:01 -0000	1.3
+++ openacs-4/packages/dotlrn/www/admin/users-chunk-medium-postgresql.xql	20 Apr 2004 21:13:22 -0000	1.4
@@ -9,7 +9,7 @@
                    dotlrn_users.first_names,
                    dotlrn_users.last_name,
                    dotlrn_users.email,
-                   acs_permission__permission_p(:dotlrn_package_id, dotlrn_users.user_id, 'read_private_data') as read_private_data_p,
+                   dotlrn_privacy__guest_p(dotlrn_users.user_id) as guest_p,
                    acs_permission__permission_p(:root_object_id, dotlrn_users.user_id, 'admin') as site_wide_admin_p
             from dotlrn_users
             where dotlrn_users.type = :type
@@ -24,7 +24,7 @@
                    dotlrn_users.first_names,
                    dotlrn_users.last_name,
                    dotlrn_users.email,
-                   acs_permission__permission_p(:dotlrn_package_id, dotlrn_users.user_id, 'read_private_data') as read_private_data_p,
+                   dotlrn_privacy__guest_p(dotlrn_users.user_id) as guest_p,
                    acs_permission__permission_p(:root_object_id, dotlrn_users.user_id, 'admin') as site_wide_admin_p
             from dotlrn_users
             where dotlrn_users.type = :type
@@ -39,7 +39,7 @@
                    persons.first_names,
                    persons.last_name,
                    parties.email,
-                   'f' as read_private_data_p,
+                   'f' as guest_p,
                    acs_permission__permission_p(:root_object_id, users.user_id, 'admin') as site_wide_admin_p
             from parties,
                  users,
@@ -69,7 +69,7 @@
                    persons.first_names,
                    persons.last_name,
                    parties.email,
-                   'f' as read_private_data_p,
+                   'f' as guest_p,
                    acs_permission__permission_p(:root_object_id, users.user_id, 'admin') as site_wide_admin_p
             from parties,
                  users,
@@ -97,7 +97,7 @@
                    persons.first_names,
                    persons.last_name,
                    parties.email,
-                   'f' as read_private_data_p,
+                   'f' as guest_p,
                    acs_permission__permission_p(:root_object_id, users.user_id, 'admin') as site_wide_admin_p
             from parties,
                  users,
@@ -121,7 +121,7 @@
                    persons.first_names,
                    persons.last_name,
                    parties.email,
-                   'f' as read_private_data_p,
+                   'f' as guest_p,
                    acs_permission__permission_p(:root_object_id, users.user_id, 'admin') as site_wide_admin_p
             from parties,
                  users,