Index: openacs-4/packages/contacts/tcl/contact-search-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/tcl/contact-search-procs.xql,v diff -u -r1.4 -r1.5 --- openacs-4/packages/contacts/tcl/contact-search-procs.xql 19 Jun 2005 07:00:28 -0000 1.4 +++ openacs-4/packages/contacts/tcl/contact-search-procs.xql 28 Jun 2005 18:11:47 -0000 1.5 @@ -34,6 +34,15 @@ + + + select type, + var_list + from contact_search_conditions + where search_id = :search_id + + + select count(*)