You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by jm...@apache.org on 2007/06/29 14:50:16 UTC
svn commit: r551875 - in /spamassassin/trunk:
lib/Mail/SpamAssassin/Plugin/Check.pm t/spamd_allow_user_rules.t
Author: jm
Date: Fri Jun 29 05:50:15 2007
New Revision: 551875
URL: http://svn.apache.org/viewvc?view=rev&rev=551875
Log:
bug 5445: body eval tests defined in user_rules cause 'Subroutine _eval_tests_type11_prineg400_set3 redefined' warnings; fix
Modified:
spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/Check.pm
spamassassin/trunk/t/spamd_allow_user_rules.t
Modified: spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/Check.pm
URL: http://svn.apache.org/viewvc/spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/Check.pm?view=diff&rev=551875&r1=551874&r2=551875
==============================================================================
--- spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/Check.pm (original)
+++ spamassassin/trunk/lib/Mail/SpamAssassin/Plugin/Check.pm Fri Jun 29 05:50:15 2007
@@ -971,6 +971,7 @@
}
EOT
+ undef &{$methodname};
eval $evalstr;
if ($@) {
Modified: spamassassin/trunk/t/spamd_allow_user_rules.t
URL: http://svn.apache.org/viewvc/spamassassin/trunk/t/spamd_allow_user_rules.t?view=diff&rev=551875&r1=551874&r2=551875
==============================================================================
--- spamassassin/trunk/t/spamd_allow_user_rules.t (original)
+++ spamassassin/trunk/t/spamd_allow_user_rules.t Fri Jun 29 05:50:15 2007
@@ -26,14 +26,36 @@
tstlocalrules ("
allow_user_rules 1
+ loadplugin myTestPlugin ../../data/testplugin.pm
");
rmtree ("log/virtualconfig/testuser", 0, 1);
mkpath ("log/virtualconfig/testuser", 0, 0755);
open (OUT, ">log/virtualconfig/testuser/user_prefs");
-print OUT "
+print OUT q{
+
header MYFOO Content-Transfer-Encoding =~ /quoted-printable/
-";
+ header MYHEADEVAL eval:check_return_2()
+
+ # bug 5445
+ urirhsbl URIBL_DYNAMIC_MPRHS dynamic.rhs.mailpolice.com. A
+ body URIBL_DYNAMIC_MPRHS eval:check_uridnsbl('URIBL_DYNAMIC_MPRHS')
+ describe URIBL_DYNAMIC_MPRHS Contains a URL listed in the MailPolice dynamic domains list
+ tflags URIBL_DYNAMIC_MPRHS net
+ priority URIBL_DYNAMIC_MPRHS -100
+ score URIBL_DYNAMIC_MPRHS 0.5
+
+ body MYBAR /bar/
+ body MYBODYEVAL eval:check_return_2()
+ rawbody MYRAWBAR /bar/
+ rawbody MYRAWBODYEVAL eval:check_return_2()
+ uri MYURI /uri/
+ full MYFULLBAR /bar/
+ full MYFULLEVAL eval:check_return_2()
+
+ meta MYMETA (MYBAR && MYFULLBAR && MYHEADEVAL)
+
+};
close OUT;
ok (start_spamd ("--virtual-config-dir=log/virtualconfig/%u -L -u $spamd_run_as_user"));