| ... | ... |
@@ -1,6 +1,9 @@ |
| 1 |
-#!/usr/bin/env perl |
|
| 1 |
+use Test::More 'no_plan'; |
|
| 2 | 2 |
|
| 3 |
-use Test::More; |
|
| 3 |
+use FindBin; |
|
| 4 |
+use lib "$FindBin::Bin/../mojo/lib"; |
|
| 5 |
+use lib "$FindBin::Bin/../lib"; |
|
| 6 |
+use lib "$FindBin::Bin/../extlib/lib/perl5"; |
|
| 4 | 7 |
|
| 5 | 8 |
use Gitprep::Git; |
| 6 | 9 |
|
| ... | ... |
@@ -34,8 +37,6 @@ my @cases = ( |
| 34 | 37 |
{ stimulus => 2 * 365 * 24 * 60 * 60 + 1, expected => '2 years ago' },
|
| 35 | 38 |
); |
| 36 | 39 |
|
| 37 |
-plan ( tests => scalar @cases ); |
|
| 38 |
- |
|
| 39 | 40 |
for ( @cases ) {
|
| 40 |
- is ( Gitprep::Git->_age_string ( $_->{stimulus} ), $_->{expected}, "$_->{stimulus} sec ~ \"$_->{expected}\"" );
|
|
| 41 |
+ is ( Gitprep::Git->new->_age_string ( $_->{stimulus} ), $_->{expected}, "$_->{stimulus} sec ~ \"$_->{expected}\"" );
|
|
| 41 | 42 |
} |
| ... | ... |
@@ -5,6 +5,4 @@ use lib "$FindBin::Bin/../mojo/lib"; |
| 5 | 5 |
use lib "$FindBin::Bin/../lib"; |
| 6 | 6 |
use lib "$FindBin::Bin/../extlib/lib/perl5"; |
| 7 | 7 |
|
| 8 |
-use Test::Mojo; |
|
| 9 |
- |
|
| 10 | 8 |
use_ok('Gitprep');
|
| ... | ... |
@@ -0,0 +1,31 @@ |
| 1 |
+use Test::More 'no_plan'; |
|
| 2 |
+ |
|
| 3 |
+use FindBin; |
|
| 4 |
+use lib "$FindBin::Bin/../mojo/lib"; |
|
| 5 |
+use lib "$FindBin::Bin/../lib"; |
|
| 6 |
+use lib "$FindBin::Bin/../extlib/lib/perl5"; |
|
| 7 |
+ |
|
| 8 |
+use_ok('DBI');
|
|
| 9 |
+use_ok('DBD::SQLite');
|
|
| 10 |
+use_ok('Object::Simple');
|
|
| 11 |
+use_ok('DBIx::Custom');
|
|
| 12 |
+use_ok('Config::Tiny');
|
|
| 13 |
+use_ok('Time::HiRes');
|
|
| 14 |
+use_ok('Test::Simple');
|
|
| 15 |
+use_ok('Validator::Custom');
|
|
| 16 |
+use_ok('DBIx::Connector');
|
|
| 17 |
+use_ok('Module::Build');
|
|
| 18 |
+use_ok('Test::Harness');
|
|
| 19 |
+use_ok('Module::Metadata');
|
|
| 20 |
+use_ok('Perl::OSType');
|
|
| 21 |
+use_ok('ExtUtils::CBuilder');
|
|
| 22 |
+use_ok('File::Spec');
|
|
| 23 |
+use_ok('IPC::Cmd');
|
|
| 24 |
+use_ok('Locale::Maketext::Simple');
|
|
| 25 |
+use_ok('Module::Load::Conditional');
|
|
| 26 |
+use_ok('Module::Load');
|
|
| 27 |
+use_ok('Params::Check');
|
|
| 28 |
+use_ok('ExtUtils::ParseXS');
|
|
| 29 |
+use_ok('Test::MockModule');
|
|
| 30 |
+use_ok('Digest::SHA');
|
|
| 31 |
+use_ok('Text::Markdown::Discount');
|