[Cpan-forum-commit] rev 112 - in trunk: lib/CPAN templates

[svn at pti.co.il]

Author: gabor
Date: 2005-02-08 21:54:50 +0200 (Tue, 08 Feb 2005)
New Revision: 112

Modified:
   trunk/lib/CPAN/Forum.pm
   trunk/templates/admin.tmpl
Log:
administrative interface to the flood control time value

Modified: trunk/lib/CPAN/Forum.pm
===================================================================
--- trunk/lib/CPAN/Forum.pm	2005-02-08 19:48:06 UTC (rev 111)
+++ trunk/lib/CPAN/Forum.pm	2005-02-08 19:54:50 UTC (rev 112)
@@ -2010,7 +2010,7 @@
 	my $q = $self->query;
 
 	# fields that can have only one value
-	foreach my $field (qw(rss_size per_page from)) {
+	foreach my $field (qw(rss_size per_page from flood_control_time_limit )) {
 		if (my ($conf) = CPAN::Forum::Configure->find_or_create({field => $field})) {
 			$conf->value($q->param($field));
 			$conf->update;

Modified: trunk/templates/admin.tmpl
===================================================================
--- trunk/templates/admin.tmpl	2005-02-08 19:48:06 UTC (rev 111)
+++ trunk/templates/admin.tmpl	2005-02-08 19:54:50 UTC (rev 112)
@@ -22,6 +22,9 @@
                          <option value="readonly" <TMPL_IF status_readonly>SELECTED</TMPL_IF>>Read only</option>
                          <option value="closed" <TMPL_IF status_closed>SELECTED</TMPL_IF>>Closed</option>
 						 </select></td></tr>
+<tr><td>Flood control time limit:</td><td><input name="flood_control_time_limit" value="<TMPL_VAR flood_control_time_limit>" size="5"></td></tr>
+	
+
 </table>
 <p>
 <input type="submit" value="Update" />