/[SWISH-PlusPlus]/trunk/t/01swish.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/01swish.t

Parent Directory Parent Directory | Revision Log Revision Log


Revision 3 - (hide annotations)
Fri Dec 3 15:23:23 2004 UTC (19 years, 3 months ago) by dpavlin
Original Path: trunk/t/swish.t
File MIME type: application/x-troff
File size: 423 byte(s)
- API change to be more line Plucene::Simple
- check_bin method to find and verify swish++ binaries
- make html target

1 dpavlin 2 #!/usr/bin/perl -w
2    
3     use strict;
4    
5 dpavlin 3 use Test::More tests => 5;
6 dpavlin 2 use Test::Exception;
7     use blib;
8    
9     BEGIN {
10     use_ok('SWISH::PlusPlus')
11     };
12    
13     my $i;
14    
15 dpavlin 3 throws_ok { SWISH::PlusPlus->open() } qr/index_dir/, "need index_dir";
16 dpavlin 2
17     ## FIXME
18     my $index = '/tmp/swish-pp';
19    
20 dpavlin 3 $i = SWISH::PlusPlus->open(
21     index_dir => $index,
22     );
23     ok($i, "open index");
24 dpavlin 2
25     ok(-e $index, "index exist");
26 dpavlin 3
27     ok($i->check_bin, "swish++ check");
28    
29     diag $i->{'version'} || die;

Properties

Name Value
svn:executable *

  ViewVC Help
Powered by ViewVC 1.1.26