- Start building dist with ShipIt
- Change to remove warnings in newer versions of
Test::Builder (Florian Ragwitz)
-
+
+0.6 2009-01-06
+ - Remove Test::Group as a dependency as Test::Group
+ currently fails its tests.
--- /dev/null
+Changes
+inc/Module/Install.pm
+inc/Module/Install/Base.pm
+inc/Module/Install/Can.pm
+inc/Module/Install/Fetch.pm
+inc/Module/Install/Makefile.pm
+inc/Module/Install/Metadata.pm
+inc/Module/Install/Win32.pm
+inc/Module/Install/WriteAll.pm
+lib/Test/NoTabs.pm
+Makefile.PL
+MANIFEST This list of files
+META.yml
+README
+t/00-load.t
+t/04-pod.t
+t/05-pod-coverage.t
+t/11-all.t
+t/12-fail.t
use Test::More qw(no_plan);
-use Test::Group;
-
use File::Temp qw( tempdir tempfile );
my $perl = $^X || 'perl';
my $inc = join(' -I ', @INC) || '';
$inc = "-I $inc" if $inc;
-test 'bad file 1' => sub {
+{
my $dir = make_bad_file_1();
my ($fh, $outfile) = tempfile();
ok( `$perl $inc -MTest::NoTabs -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile` );
local $/ = undef;
my $content = <$fh>;
- like( $content, qr/^not ok 1 - Found tabs in '[^']*' on line 4/m, 'tabs found in tmp file' );
-};
+ like( $content, qr/^not ok 1 - Found tabs in '[^']*' on line 4/m, 'tabs found in tmp file 1' );
+}
-test 'bad file 2' => sub {
+{
my $dir = make_bad_file_2();
my ($fh, $outfile) = tempfile();
ok( `$perl $inc -MTest::NoTabs -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile` );
local $/ = undef;
my $content = <$fh>;
- like( $content, qr/^not ok 1 - Found tabs in '[^']*' on line 12/m, 'tabs found in tmp file' );
-};
+ like( $content, qr/^not ok 1 - Found tabs in '[^']*' on line 12/m, 'tabs found in tmp file2 ' );
+}
-test 'bad file 3' => sub {
+{
my $file = make_bad_file_3();
my ($fh, $outfile) = tempfile();
ok( `$perl $inc -MTest::NoTabs -e "all_perl_files_ok( '$file' )" 2>&1 > $outfile` );
local $/ = undef;
my $content = <$fh>;
- like( $content, qr/^not ok 1 - Found tabs in '[^']*' on line 6/m, 'tabs found in tmp file' );
-};
+ like( $content, qr/^not ok 1 - Found tabs in '[^']*' on line 6/m, 'tabs found in tmp file 3' );
+}
sub make_bad_file_1 {
my $tmpdir = tempdir();