Permalink
Browse files

fixes for new test more

  • Loading branch information...
1 parent 576c6b0 commit f0e908977905eef193df87fa572e2a55b963bee6 @rjbs rjbs committed Sep 17, 2007
Showing with 9 additions and 10 deletions.
  1. +3 −0 Changes
  2. +2 −2 lib/Mail/SpamAssassin/SimpleClient.pm
  3. +2 −4 t/result-ham.t
  4. +2 −4 t/result-spam.t
View
@@ -1,5 +1,8 @@
Revision history for Mail-SpamAssassin-SimpleClient
+0.005 2007-09-17
+ fix bugs exposed by new Test::More
+
0.004 2007-04-12
add email method to results
@@ -14,13 +14,13 @@ Mail::SpamAssassin::SimpleClient - easy client to SpamAssassin's spamd
=head1 VERSION
-version 0.004
+version 0.005
$Id$
=cut
-our $VERSION = '0.004';
+our $VERSION = '0.005';
=head1 SYNOPSIS
View
@@ -2,17 +2,15 @@
use strict;
use warnings;
+use Mail::SpamAssassin::SimpleClient;
+use Email::Simple;
use Test::More;
plan skip_all => "set PERL_SIMPLECLIENT_TEST to run these tests"
unless $ENV{PERL_SIMPLECLIENT_TEST};
plan 'no_plan';
-use Email::Simple;
-
-BEGIN { use_ok('Mail::SpamAssassin::SimpleClient'); }
-
open my $msg_fh, '<', 't/messages/not-spam.msg';
my $msg = do { local $/; <$msg_fh>; };
View
@@ -2,17 +2,15 @@
use strict;
use warnings;
+use Email::Simple;
+use Mail::SpamAssassin::SimpleClient;
use Test::More;
plan skip_all => "set PERL_SIMPLECLIENT_TEST to run these tests"
unless $ENV{PERL_SIMPLECLIENT_TEST};
plan 'no_plan';
-use Email::Simple;
-
-BEGIN { use_ok('Mail::SpamAssassin::SimpleClient'); }
-
open my $msg_fh, '<', 't/messages/spam.msg';
my $msg = do { local $/; <$msg_fh>; };

0 comments on commit f0e9089

Please sign in to comment.