CPAN::Groonga

bose => 0,
	quiet => 1,
	);
isnt($config, undef, "new PBib::Config");


my $bib = new Biblio::Biblio(
	file => 't/sample.bib',
	verbose => 0,
	quiet => 1,
	);
isnt($bib, undef, "open biblio da

tabase");


my $refs = $bib->queryPapers();
isnt($refs, undef, "queryPapers()");
# I do assume that sample.bib is read correctly
# as this is tested in 20-biblio.t


# process files

my $pbib

 = new PBib::PBib('refs' => $refs,
	'config' => $config,
	);
isnt($pbib, undef, "new PBib::PBib()");
is($pbib->config()->option("quiet"), 1, "option('quiet') for this test");
is($pbib->config()->

	file => 't/sample.bib',
	verbose => 0,
	quiet => 1,
	);
isnt($bib, undef, "open biblio database");

my $refs = $bib->queryPapers();
isnt($refs, undef, "queryPapers()");

my $a = $bib->queryPape

	argv => 0,
	env => 0,
	site => 0,
	user => 0,
	default => 1,
	quiet => 1,
	verbose => 0,
	);
isnt($c, undef, "config create");
# print Dumper $c;

my $options = $c->options( -file => 'sample.txt'