/[Biblio-Isis]/trunk/t/001_load.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/t/001_load.t

Parent Directory Parent Directory | Revision Log Revision Log


Revision 38 - (hide annotations)
Wed Jan 12 19:28:41 2005 UTC (19 years, 2 months ago) by dpavlin
File MIME type: application/x-troff
File size: 275 byte(s)
use File::Spec in attempt to support MacPerl

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    

Properties

Name Value
svn:executable

  ViewVC Help
Powered by ViewVC 1.1.26