Index: openacs-4/packages/attendance/www/admin/spam.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attendance/www/admin/spam.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/attendance/www/admin/spam.adp	20 Jul 2005 09:33:15 -0000	1.2
+++ openacs-4/packages/attendance/www/admin/spam.adp	3 Aug 2005 10:46:36 -0000	1.3
@@ -2,9 +2,26 @@
 <property name="title">@page_title;noquote@</property>
 <property name="context">"@context;noquote@"</property>
 
+<SCRIPT LANGUAGE="JavaScript">
+function checkAll(field)
+{
+for (i = 0; i < field.length; i++)
+	field[i].checked = true ;
+}
+
+function uncheckAll(field)
+{
+for (i = 0; i < field.length; i++)
+	field[i].checked = false ;
+}
+//  End -->
+</script>
+
 Select the users to whom you would like to send an email.
 <br /><br />
 
+<a onClick="checkAll(document.mark_attendance.recipients);" class="button">Check All</a>&nbsp;<a onClick="uncheckAll(document.mark_attendance.recipients);" class="button">Uncheck All</a>
+<br /><br />
 <form name="mark_attendance" action="@community_url@/spam" method="POST">
 	<input type="hidden" name="referer" value="@return_url@">
 	<listtemplate name="email_members"></listtemplate>
Index: openacs-4/packages/attendance/www/admin/spam.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attendance/www/admin/spam.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/attendance/www/admin/spam.tcl	20 Jul 2005 09:33:15 -0000	1.2
+++ openacs-4/packages/attendance/www/admin/spam.tcl	3 Aug 2005 10:46:36 -0000	1.3
@@ -52,5 +52,3 @@
 	}
 	template::multirow append email_members "[ns_set get $user user_id]" "[ns_set get $user first_names] [ns_set get $user last_name]" "$attendance" ""
 }
-
-#ad_returnredirect $spam_url