13 |
|
|
14 |
=head1 VERSION |
=head1 VERSION |
15 |
|
|
16 |
Version 0.04 |
Version 0.05 |
17 |
|
|
18 |
=cut |
=cut |
19 |
|
|
20 |
our $VERSION = '0.04'; |
our $VERSION = '0.05'; |
21 |
|
|
22 |
=head1 SYNOPSIS |
=head1 SYNOPSIS |
23 |
|
|
118 |
max => 100, |
max => 100, |
119 |
options => $HyperEstraier::Condition::SURE, |
options => $HyperEstraier::Condition::SURE, |
120 |
page => 42, |
page => 42, |
121 |
|
depth => 0, |
122 |
); |
); |
123 |
|
|
124 |
Options are close match to Hyper Estraier API, except C<get_attr> which defines |
Options are close match to Hyper Estraier API, except C<get_attr> which defines |
170 |
|
|
171 |
$cond->set_max( $page * $max ); |
$cond->set_max( $page * $max ); |
172 |
|
|
173 |
my $result = $self->{db}->search($cond, 0) || |
my $result = $self->{db}->search($cond, ( $args->{depth} || 0 )) || |
174 |
$log->die("can't search for ", sub { Dumper( $args ) }); |
$log->die("can't search for ", sub { Dumper( $args ) }); |
175 |
|
|
176 |
my $hits = $result->doc_num; |
my $hits = $result->doc_num; |