Index: openacs-4/packages/chat/www/search-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/www/search-2.tcl,v diff -u -r1.3.2.1 -r1.3.2.2 --- openacs-4/packages/chat/www/search-2.tcl 19 Aug 2008 21:06:26 -0000 1.3.2.1 +++ openacs-4/packages/chat/www/search-2.tcl 19 Aug 2008 22:09:13 -0000 1.3.2.2 @@ -122,7 +122,7 @@ set user_search:[set rowcount](email) $email set user_search:[set rowcount](export_vars) [export_url_vars user_id_from_search first_names_from_search last_name_from_search email_from_search] set user_search:[set rowcount](member_state) $member_state - set user_search:[set rowcount](url) [export_vars -base "search-3" {room_id type user_id}] + set user_search:[set rowcount](url) [export_vars -base "search-3" {room_id type {party_id $user_id}}] if { $member_state != "approved" } {