Index: openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.xql,v diff -u -r1.8 -r1.9 --- openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.xql 29 Mar 2002 19:38:25 -0000 1.8 +++ openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.xql 28 Apr 2002 04:08:41 -0000 1.9 @@ -2,47 +2,47 @@ - - - select type - from dotlrn_user_types - order by pretty_name - - + + + select type + from dotlrn_user_types + order by pretty_name + + - - - select pretty_name, - type - from dotlrn_user_types - order by pretty_name - - + + + select pretty_name, + type + from dotlrn_user_types + order by pretty_name + + - - - select rel_id - from dotlrn_users - where user_id = :user_id - - + + + select rel_id + from dotlrn_users + where user_id = :user_id + + - - - select type - from dotlrn_users - where user_id = :user_id - > - + + + select type + from dotlrn_users + where user_id = :user_id + > + - - - update dotlrn_full_user_profile_rels - set portal_id = :portal_id - where rel_id = (select rel_id - from dotlrn_full_users - where user_id = :user_id) - - + + + update dotlrn_user_profile_rels + set portal_id = :portal_id + where rel_id = (select rel_id + from dotlrn_users + where user_id = :user_id) + +