Index: openacs-4/packages/contacts/lib/contacts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/contacts.tcl,v
diff -u -r1.45 -r1.46
--- openacs-4/packages/contacts/lib/contacts.tcl	27 Feb 2006 03:37:06 -0000	1.45
+++ openacs-4/packages/contacts/lib/contacts.tcl	4 Mar 2006 22:58:41 -0000	1.46
@@ -130,7 +130,7 @@
 append name_label "    [_ contacts.Show]: "
 
 
-set valid_page_sizes [list 25 50 100 500]
+set valid_page_sizes [list 25 50 100 5000]
 if { ![exists_and_not_null page_size] || [lsearch $valid_page_sizes $page_size] < 0 } {
     set page_size [parameter::get -parameter "DefaultPageSize" -default "50"]
 }