From fd458430140fbf91fc227534e4b74ffbe71c196a Mon Sep 17 00:00:00 2001
From: Alex Schroeder <alex@gnu.org>
Date: Thu, 1 Dec 2011 10:20:14 +0000
Subject: [PATCH] (post_addition): Add support for honeypot.

---
 contrib/campaignwiki/submit.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/contrib/campaignwiki/submit.pl b/contrib/campaignwiki/submit.pl
index 1dba44f2..a408a907 100644
--- a/contrib/campaignwiki/submit.pl
+++ b/contrib/campaignwiki/submit.pl
@@ -210,7 +210,9 @@ sub post_addition {
 		  summary => $title,
 		  username => GetParam('username'),
 		  pwd => GetParam('pwd'));
+    # spam fighting modules
     $params{$QuestionaskerSecretKey} = 1 if $QuestionaskerSecretKey;
+    $params{$HoneyPotOk} = time if $HoneyPotOk;
     my $response = $ua->post($site, \%params);
     if ($response->is_error) {
       print $q->p("The submission failed!");