Index: openacs-4/packages/acs-authentication/tcl/local-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/local-procs.tcl,v diff -u -r1.47.2.3 -r1.47.2.4 --- openacs-4/packages/acs-authentication/tcl/local-procs.tcl 22 Feb 2021 19:00:04 -0000 1.47.2.3 +++ openacs-4/packages/acs-authentication/tcl/local-procs.tcl 29 Apr 2021 07:14:40 -0000 1.47.2.4 @@ -639,14 +639,16 @@ Implements the Search operation of the auth_search service contract for the local account implementation. } { - - set results [list] - db_foreach user_search {} { - lappend results $user_id - } - - return $results - + return [db_list user_search { + select distinct user_id + from cc_users u + where upper(coalesce(u.first_names || ' ', '') || + coalesce(u.last_name || ' ', '') || + u.email || ' ' || + u.username || ' ' || + coalesce(u.screen_name, '')) like upper('%'||:search_text||'%') + order by username, email + }] } ad_proc -private auth::local::search::GetParameters {} {