Index: openacs-4/packages/dotlrn/www/admin/user-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-postgresql.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/www/admin/user-postgresql.xql	3 Nov 2003 10:46:45 -0000	1.3
+++ openacs-4/packages/dotlrn/www/admin/user-postgresql.xql	20 Apr 2004 21:13:21 -0000	1.4
@@ -5,10 +5,10 @@
 
     <fullquery name="select_dotlrn_user_info">
         <querytext>
-            select dotlrn_users.*,
-                   acs_permission__permission_p(:root_object_id, dotlrn_users.user_id, 'admin') as site_wide_admin_p,
-                   acs_permission__permission_p(:dotlrn_package_id, :user_id, 'read_private_data') as read_private_data_p
-            from dotlrn_users
+            select dotlrn_users.*, guest_p,
+                   acs_permission__permission_p(:root_object_id, dotlrn_users.user_id, 'admin') as site_wide_admin_p
+            from dotlrn_users left outer join dotlrn_guest_status
+              on dotlrn_guest_status.user_id = dotlrn_users.user_id
             where dotlrn_users.user_id = :user_id
         </querytext>
     </fullquery>