- Notifications
You must be signed in to change notification settings - Fork 194
/
Copy pathcover.t
21 lines (15 loc) · 476 Bytes
/
cover.t
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
use strict;
use warnings;
use lib 't/lib';
use MetaCPAN::Script::Cover ();
use MetaCPAN::Server::Config ();
use MetaCPAN::Util qw( root_dir );
use Test::More;
use URI ();
my$root = root_dir();
my$file = URI->new('t/var/cover.json')->abs("file://$root/");
my$config = MetaCPAN::Server::Config::config();
$config->{cover_url} = "$file";
my$cover = MetaCPAN::Script::Cover->new_with_options($config);
ok $cover->run, 'runs and returns true';
done_testing();