Index: openacs-4/packages/dotlrn/www/admin/user-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-oracle.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/dotlrn/www/admin/user-oracle.xql 19 Mar 2002 01:23:15 -0000 1.3 +++ openacs-4/packages/dotlrn/www/admin/user-oracle.xql 22 Mar 2002 22:23:54 -0000 1.4 @@ -5,17 +5,13 @@ - select dotlrn_users.id, - dotlrn_users.type, - dotlrn_user_types.pretty_name as pretty_type, + select dotlrn_users.*, case when dotlrn_full_user_profile_rels.rel_id is null then 'Limited' else 'Full' end as access_level, acs_permission.permission_p(:dotlrn_package_id, :user_id, 'read_private_data') as read_private_data_p from dotlrn_users, - dotlrn_full_user_profile_rels, - dotlrn_user_types + dotlrn_full_user_profile_rels where dotlrn_users.user_id = :user_id and dotlrn_users.rel_id = dotlrn_full_user_profile_rels.rel_id(+) - and dotlrn_users.type = dotlrn_user_types.type