--- trunk/lib/WebPAC/Output/KinoSearch.pm	2006/04/17 16:50:53	434
+++ trunk/lib/WebPAC/Output/KinoSearch.pm	2006/04/30 19:06:09	437
@@ -155,13 +155,14 @@
 
 	my $doc = $self->{invindex}->new_doc( $uri ) || $log->logdie("can't create new_doc( $uri )");
 
-	sub add_value($$$) {
-		my ($doc,$n,$v) = @_;
+	sub add_value($$$$$) {
+		my ($self,$log,$doc,$n,$v) = @_;
+		return unless ($v);
 		eval { $doc->set_value($n, $self->convert($v) ) };
 		$log->warn("can't insert: $n = $v") if ($@);
 	}
 
-	add_value($doc, 'uri', $uri);
+	add_value($self,$log,$doc, 'uri', $uri);
 
 	$log->debug("ds = ", sub { Dumper($args->{'ds'}) } );
 
@@ -183,11 +184,11 @@
 		$vals = $self->convert( $vals ) or
 			$log->logdie("can't convert '$vals' to UTF-8");
 
-		add_value($doc, $tag, $vals );
+		add_value($self, $log, $doc, $tag, $vals );
 	}
 
 	if (my $text = $args->{'text'}) {
-		add_value($doc, 'bodytext', $text );
+		add_value($self, $log, $doc, 'bodytext', $text );
 	}
 
 	#$log->debug("adding ", sub { $doc->dump_draft } );