Parent Directory
| 
Revision Log
| 
Patch
| revision 1 by dpavlin, Fri Jun 19 17:50:34 2009 UTC | revision 4 by dpavlin, Sat Jun 20 19:28:04 2009 UTC | |
|---|---|---|
| # | Line 3 | Line 3 |
| 3 | use warnings; | use warnings; |
| 4 | use strict; | use strict; |
| 5 | ||
| 6 | use Test::More tests => 2; | use Test::More tests => 3; |
| 7 | ||
| 8 | use_ok 'COBISS'; | use_ok 'COBISS'; |
| 9 | ||
| 10 | ok( my $results = COBISS->search() ); | ok( my $search = COBISS->search( 'TI=book' ), 'search' ); |
| 11 | ||
| 12 | ok( my $marc = COBISS->fetch_marc, 'fetch_marc' ); |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |