Index: openacs-4/packages/contacts/www/bulk-update.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/www/bulk-update.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/contacts/www/bulk-update.tcl 17 Jun 2005 19:32:03 -0000 1.2 +++ openacs-4/packages/contacts/www/bulk-update.tcl 19 Jun 2005 05:08:01 -0000 1.3 @@ -5,12 +5,17 @@ @creation-date 2005-06-14 @cvs-id $Id$ } { - {party_id:integer,multiple,optional} + {party_id:integer,multiple ""} {person_ids ""} {organization_ids ""} {attribute_id ""} {return_url "./"} } -validate { + parties_submitted_p { + if { [llength $party_id] == 0 && [llength $person_ids] == 0 && [llength $organization_ids] == 0 } { + ad_complain [_ contacts.lt_You_need_parties_to_bulk_update] + } + } } set title "[_ contacts.Bulk_Update]"