--- trunk/lib/WebPAC/Output/Estraier.pm	2005/12/05 17:47:10	211
+++ trunk/lib/WebPAC/Output/Estraier.pm	2005/12/05 17:47:23	213
@@ -88,7 +88,6 @@
 	}
 
 	my $url = $self->{masterurl} . '/node/' . $self->{database};
-	$url =~ s#//#/#g;
 	$self->{url} = $url;
 
 	$log->info("opening Hyper Estraier index $self->{url}");
@@ -127,13 +126,12 @@
   	id => 42,
 	ds => $ds,
 	type => 'display',
-	url_prefix => 'database name',
 	text => 'optional text from which snippet is created',
   );
 
 This function will create  entries in index using following URI format:
 
-  C<file:///database%20name/000>
+  C<file:///type/database%20name/000>
 
 Each tag in C<data_structure> with specified C<type> will create one
 attribute and corresponding hidden text (used for search).
@@ -155,9 +153,9 @@
 	}
 
 	my $type = $args->{'type'};
-	my $mfn = $args->{'id'};
+	my $id = $args->{'id'};
 
-	my $uri = "file:///$type/$database/$mfn";
+	my $uri = "file:///$type/$database/$id";
 	$log->debug("creating $uri");
 
 	my $doc = HyperEstraier::Document->new;
@@ -195,7 +193,7 @@
 	}
 
 	$log->debug("adding ", sub { $doc->dump_draft } );
-	$self->{'db'}->put_doc($doc) || $log->logdie("can't add document $uri to index");
+	$self->{'db'}->put_doc($doc) || $log->logdie("can't add document $uri to node " . $self->{url} . " status: " . $self->{db}->status());
 
 	return 1;
 }