Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

We’re showing branches in this repository, but you can also compare across forks.

base fork: acme/CPAN-Unpack
base: 6dd86adcb2
...
head fork: acme/CPAN-Unpack
compare: f95b0b3ab6
  • 2 commits
  • 1 file changed
  • 0 commit comments
  • 1 contributor
Commits on Jan 22, 2012
Léon Brocard Fix test 4c6ca9b
Léon Brocard Perltidy test f95b0b3
Showing with 7 additions and 7 deletions.
  1. +7 −7 t/local.t
14 t/local.t
View
@@ -5,17 +5,17 @@ use Test::More tests => 7;
use_ok("CPAN::Unpack");
rmtree("t/unpacked");
-ok(!-d "t/unpacked", "No t/unpacked at the start");
+ok( !-d "t/unpacked", "No t/unpacked at the start" );
my $u = CPAN::Unpack->new;
$u->cpan("t/cpan/");
$u->destination("t/unpacked/");
$u->unpack;
-ok(-d "t/unpacked");
-ok(-d "t/unpacked/Acme-Buffy");
-ok(-d "t/unpacked/Acme-Colour");
-ok(-d "t/unpacked/GraphViz");
+ok( -d "t/unpacked" );
+ok( -d "t/unpacked/Acme-Buffy" );
+ok( -d "t/unpacked/Acme-Colour" );
+ok( -d "t/unpacked/GraphViz" );
-my @files = <t/unpacked/GraphViz/*>;
-is(scalar(@files), 7);
+my @files = <t/unpacked/GraphViz/GraphViz-1.8/*>;
+is( scalar(@files), 7 );

No commit comments for this range

Something went wrong with that request. Please try again.