Parent Directory | Revision Log
renamed tests
1 | dpavlin | 1 | #!/usr/bin/perl -w |
2 | |||
3 | use strict; | ||
4 | use blib; | ||
5 | |||
6 | use Test::More tests => 2; | ||
7 | dpavlin | 38 | use File::Spec; |
8 | dpavlin | 1 | |
9 | dpavlin | 36 | BEGIN { use_ok( 'Biblio::Isis' ); } |
10 | dpavlin | 1 | |
11 | dpavlin | 38 | my $path = File::Spec->catfile('data', 'winisis', 'BIBL'); |
12 | |||
13 | dpavlin | 36 | my $object = Biblio::Isis->new ( |
14 | dpavlin | 38 | isisdb => $path, |
15 | dpavlin | 2 | ); |
16 | dpavlin | 1 | |
17 | dpavlin | 36 | isa_ok ($object, 'Biblio::Isis'); |
18 | dpavlin | 1 | |
19 |
Name | Value |
---|---|
svn:executable |
ViewVC Help | |
Powered by ViewVC 1.1.26 |