--- trunk/index_DBI_cache.pm	2003/07/12 16:02:15	88
+++ trunk/index_DBI_cache.pm	2003/07/13 14:44:03	93
@@ -99,7 +99,14 @@
 	$Table{$field}++;
 
 	#$sth_cache{$field."select"}->execute($index_data) || die "cache: $field select; ".$self->{dbh}->errstr();
+
+	# XXX for some strange reason, it seems that some entries in my
+	# database produce strings which start with null byte. I suspect
+	# this to be bug in OpenIsis 0.9.0.
+	# This should fix it..
+	$index_data =~ s/^[^\w]+//;
 	$index_data = substr($index_data,0,255);
+
 	my $uc = uc($index_data);
 	if (! $c_table->{$field}->{$ident}->{$uc}) {
 		$sth_cache{$field."insert"}->execute($index_data,$ident,0) || warn "cache: $field insert ($index_data,$ident); ".$self->{dbh}->errstr();