--- trunk/lib/WebPAC/Search/Estraier.pm	2005/12/05 17:47:10	211
+++ trunk/lib/WebPAC/Search/Estraier.pm	2005/12/05 17:47:45	216
@@ -13,11 +13,11 @@
 
 =head1 VERSION
 
-Version 0.04
+Version 0.05
 
 =cut
 
-our $VERSION = '0.04';
+our $VERSION = '0.05';
 
 =head1 SYNOPSIS
 
@@ -86,7 +86,6 @@
 	}
 
 	my $url = $self->{masterurl} . '/node/' . $self->{database};
-	$url =~ s#//#/#g;
 	$self->{url} = $url;
 
 	$log->info("opening Hyper Estraier index $self->{'url'} as $self->{'user'}");
@@ -119,6 +118,7 @@
 	max => 100,
 	options => $HyperEstraier::Condition::SURE,
 	page => 42,
+	depth => 0,
   );
 
 Options are close match to Hyper Estraier API, except C<get_attr> which defines
@@ -170,7 +170,7 @@
 
 	$cond->set_max( $page * $max );
 
-	my $result = $self->{db}->search($cond, 0) ||
+	my $result = $self->{db}->search($cond, ( $args->{depth} || 0 )) ||
 		$log->die("can't search for ", sub { Dumper( $args ) });
 
 	my $hits = $result->doc_num;