Index: openacs-4/packages/contacts/lib/contacts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.tcl,v
diff -u -r1.65 -r1.66
--- openacs-4/packages/contacts/lib/contacts.tcl	28 May 2006 01:25:31 -0000	1.65
+++ openacs-4/packages/contacts/lib/contacts.tcl	6 Jun 2006 19:49:05 -0000	1.66
@@ -9,6 +9,7 @@
 set _page_size "25"
 set admin_p 0
 
+
 if { [string is false [exists_and_not_null package_id]] } {
     set package_id [ad_conn package_id]
 }
@@ -33,6 +34,12 @@
     }
 }
 
+# if a double colon is in the query then the paginator messes up because it evals
+# the page string and attempts to run it as a proc, so we remove all double colons
+# here.
+while { [regsub -all {::} $query {:} query] } {}
+
+
 # see if the person is attemping to add
 # or remove a column
 set extended_columns [ns_queryget extended_columns]