Skip to content

Commit ec7dc1f

Browse files
committed
Add unit test for "POD" and "Check load and use Modules"
1 parent 27558d3 commit ec7dc1f

File tree

2 files changed

+18
-0
lines changed

2 files changed

+18
-0
lines changed

t/00-pod.t

Lines changed: 8 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,8 @@
1+
#!/usr/bin/perl
2+
use strict;
3+
use warnings;
4+
use Test::More;
5+
eval "use Test::Pod 1.00";
6+
plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
7+
my @poddirs = qw( lib );
8+
all_pod_files_ok( all_pod_files( @poddirs ) );

t/01-load.t

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
#!/usr/bin/perl
2+
use strict;
3+
use warnings;
4+
use Test::More tests => 2;
5+
6+
use CellBIS::SQL::Abstract;
7+
8+
my $sql_abstract = CellBIS::SQL::Abstract->new;
9+
ok(defined $sql_abstract, 'Module CellBIS::SQL::Abstract can loaded');
10+
ok($sql_abstract->isa('CellBIS::SQL::Abstract'), 'Modules can be used.');

0 commit comments

Comments
 (0)