Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.xql,v diff -u -N -r1.34 -r1.34.2.1 --- openacs-4/packages/acs-tcl/tcl/community-core-procs.xql 28 Jun 2018 09:41:24 -0000 1.34 +++ openacs-4/packages/acs-tcl/tcl/community-core-procs.xql 25 Jan 2022 17:31:02 -0000 1.34.2.1 @@ -1,37 +1,37 @@ - + - + update persons set [join $cols ", "] where person_id = :person_id - + - + - + update acs_objects set title = :first_names || ' ' || :last_name where object_id = :person_id - + - + - + update users set [join $cols ", "] where user_id = :user_id - + - + select user_id @@ -42,19 +42,19 @@ - + - + update parties set [join $cols ", "] where party_id = :party_id - + - + update acs_objects set title = :email where object_id = :party_id @@ -65,9 +65,9 @@ - - select party_id - from parties + + select party_id + from parties where lower(email) = lower(:email) @@ -77,7 +77,7 @@ select name - from + from organizations where organization_id = :party_id @@ -88,7 +88,7 @@ select group_name - from + from groups where group_id = :party_id @@ -99,7 +99,7 @@ select party_name - from + from party_names where party_id = :party_id