Checking in changes prior to tagging of version 0.6. Changelog diff is: Test-NoTabs-0.6
Tomas Doran [Tue, 6 Jan 2009 22:54:26 +0000 (22:54 +0000)]
.gitignore
Changes
MANIFEST [new file with mode: 0644]
Makefile.PL
lib/Test/NoTabs.pm
t/12-fail.t

index 6a39c71..9638bdd 100644 (file)
@@ -1,4 +1,3 @@
-MANIFEST
 MANIFEST.bak
 META.yml
 Makefile
diff --git a/Changes b/Changes
index 87b454f..7d0269c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -18,4 +18,7 @@ Revision history for Test-NoTabs
      - 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.
diff --git a/MANIFEST b/MANIFEST
new file mode 100644 (file)
index 0000000..fc178c5
--- /dev/null
+++ b/MANIFEST
@@ -0,0 +1,19 @@
+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
index 6ba3a8a..9760f33 100644 (file)
@@ -8,7 +8,6 @@ requires 'Test::Builder';
 requires 'File::Spec';
 requires 'FindBin';
 requires 'File::Find';
-requires 'Test::Group';
 
 WriteAll;
 
index 6f05be0..3525d1e 100644 (file)
@@ -10,7 +10,7 @@ use File::Find;
 
 use vars qw( $VERSION $PERL $UNTAINT_PATTERN $PERL_PATTERN);
 
-$VERSION = '0.5';
+$VERSION = '0.6';
 
 $PERL    = $^X || 'perl';
 $UNTAINT_PATTERN  = qr|^([-+@\w./:\\]+)$|;
index 3278a42..21daa75 100644 (file)
@@ -2,40 +2,38 @@ use strict;
 
 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();