svn commit: rev 10395 - in incubator/spamassassin/trunk: . t

[jm...@apache.org]

Author: jm
Date: Wed Apr 28 18:18:32 2004
New Revision: 10395

Added:
   incubator/spamassassin/trunk/t/spamc_E.t   (contents, props changed)
Modified:
   incubator/spamassassin/trunk/MANIFEST
   incubator/spamassassin/trunk/t/SATest.pm
Log:
test for spamc -E

Modified: incubator/spamassassin/trunk/MANIFEST
==============================================================================
--- incubator/spamassassin/trunk/MANIFEST	(original)
+++ incubator/spamassassin/trunk/MANIFEST	Wed Apr 28 18:18:32 2004
@@ -342,3 +342,4 @@
 t/prefs_include.t
 t/body_mod.t
 t/bayesdbm_flock.t
+t/spamc_E.t

Modified: incubator/spamassassin/trunk/t/SATest.pm
==============================================================================
--- incubator/spamassassin/trunk/t/SATest.pm	(original)
+++ incubator/spamassassin/trunk/t/SATest.pm	Wed Apr 28 18:18:32 2004
@@ -240,6 +240,8 @@
   %found = ();
   %found_anti = ();
   &checkfile ("$testname.out", $read_sub) if (defined $read_sub);
+
+  ($sa_exitcode == 0);
 }
 
 sub spamcrun_background {

Added: incubator/spamassassin/trunk/t/spamc_E.t
==============================================================================
--- (empty file)
+++ incubator/spamassassin/trunk/t/spamc_E.t	Wed Apr 28 18:18:32 2004
@@ -0,0 +1,21 @@
+#!/usr/bin/perl
+
+use lib '.'; use lib 't';
+use SATest; sa_t_init("spamc_c");
+use Test; BEGIN { plan tests => ($SKIP_SPAMD_TESTS ? 0 : 2) };
+
+exit if $SKIP_SPAMD_TESTS;
+
+# ---------------------------------------------------------------------------
+
+%patterns = (
+);
+
+start_spamd("-L");
+ok (!spamcrun ("-E < data/spam/001", \&patterns_run_cb));
+stop_spamd();
+start_spamd("-L");
+ok (spamcrun ("-E < data/nice/001", \&patterns_run_cb));
+stop_spamd();
+
+