Permalink
Browse files

fixed 31lastid.t to start with a blank sheet

  • Loading branch information...
1 parent ba5e0c5 commit 1368692a7a712a3dbbead87465a38f5ebc4d2e4a @barbie barbie committed Nov 9, 2009
Showing with 9 additions and 4 deletions.
  1. +3 −0 CHANGES
  2. +2 −2 META.yml
  3. +1 −1 lib/CPAN/Testers/WWW/Reports/Mailer.pm
  4. +3 −1 t/31lastid.t
View
@@ -1,5 +1,8 @@
Revision history for Perl module CPAN::Testers::WWW::Reports::Mailer.
+0.25 09/11/2009
+ - fixed 31lastid.t to start with a blank sheet.
+
0.24 05/11/2009
- POD documentation updates.
- moved tuples check to later in the process, as it is a big database
View
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: CPAN-Testers-WWW-Reports-Mailer
-version: 0.24
+version: 0.25
abstract: CPAN Testers Reports Mailer
author:
- Barbie <barbie@cpan.org>
@@ -34,7 +34,7 @@ requires:
provides:
CPAN::Testers::WWW::Reports::Mailer:
file: lib/CPAN/Testers/WWW/Reports/Mailer.pm
- version: 0.24
+ version: 0.25
meta-spec:
version: 1.4
@@ -4,7 +4,7 @@ use warnings;
use strict;
use vars qw($VERSION);
-$VERSION = '0.24';
+$VERSION = '0.25';
=head1 NAME
View
@@ -10,10 +10,12 @@ use IO::File;
use lib 't';
use CTWRM_Testing;
+my $f = 't/_DBDIR/lastmail';
+unlink $f;
+
{
ok( my $obj = CTWRM_Testing::getObj(), "got object" );
- my $f = 't/_DBDIR/lastmail';
ok($obj->lastmail($f),'reset last mail file');
is($obj->lastmail,$f, 'reset last mail');

0 comments on commit 1368692

Please sign in to comment.