--- trunk/all2xml.pl	2003/11/24 21:54:19	178
+++ trunk/all2xml.pl	2003/11/25 20:04:24	180
@@ -102,20 +102,20 @@
 	}
 
 	my @sorted_tags;
-	if ($cache->{tags_by_order}->{$type}) {
-		@sorted_tags = @{$cache->{tags_by_order}->{$type}};
+	if ($cache->{tags_by_order}) {
+		@sorted_tags = @{$cache->{tags_by_order}};
 	} else {
 		@sorted_tags = sort by_order keys %{$config->{indexer}};
-		$cache->{tags_by_order}->{$type} = \@sorted_tags;
+		$cache->{tags_by_order} = \@sorted_tags;
 	}
 
 	# lookup key
 	my $lookup_key;
 
 	# cache for field in pages
-	$cache->{display_data} = ();
-	$cache->{swish_data} = ();
-	$cache->{swish_exact_data} = ();
+	delete $cache->{display_data};
+	delete $cache->{swish_data};
+	delete $cache->{swish_exact_data};
 	my @page_fields;	# names of fields
 
 
@@ -566,6 +566,9 @@
 	# now read database
 print STDERR "using: $type...\n";
 
+	# erase cache for tags by order in this database
+	delete $cache->{tags_by_order};
+
 	if ($type_base eq "isis") {
 
 		my $isis_db = $cfg -> val($database, 'isis_db') || die "$database doesn't have 'isis_db' defined!";