Index: openacs-4/packages/contacts/lib/contacts.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.tcl,v diff -u -r1.28 -r1.29 --- openacs-4/packages/contacts/lib/contacts.tcl 20 Oct 2005 22:52:33 -0000 1.28 +++ openacs-4/packages/contacts/lib/contacts.tcl 21 Oct 2005 10:54:12 -0000 1.29 @@ -83,12 +83,18 @@ switch $orderby { "first_names,asc" { set name_label "[_ contacts.Sort_by]: [_ contacts.First_Names] | [_ contacts.Last_Name] | [_ contacts.Organization]" + set left_join "left join persons on (parties.party_id = persons.person_id)" + set sort_item "lower(first_names)" } "last_name,asc" { set name_label "[_ contacts.Sort_by] [_ contacts.First_Names] | [_ contacts.Last_Name] | [_ contacts.Organization]" + set left_join "left join persons on (parties.party_id = persons.person_id)" + set sort_item "lower(last_name)" } "organization,asc" { set name_label "[_ contacts.Sort_by] [_ contacts.First_Names] | [_ contacts.Last_Name] | [_ contacts.Organization]" + set left_join "left join organizations on (parties.party_id = organizations.organization_id)" + set sort_item "lower(organizations.name)" } }