+ $cache->{tags_by_order} = \@sorted_tags;
+ }
+
+ # lookup key
+ my $lookup_key;
+
+ # cache for field in pages
+ delete $cache->{display_data};
+ delete $cache->{swish_data};
+ delete $cache->{swish_exact_data};
+ delete $cache->{index_data};
+ delete $cache->{index_delimiter};
+ my @page_fields; # names of fields
+
+
+ # subs used to produce output
+
+ sub get_field_name($$$) {
+ my ($config,$field,$field_usage) = @_;
+
+ # find field name (signular, plural)
+ my $field_name = "";
+ if ($config->{indexer}->{$field}->{name_singular} && $field_usage == 1) {
+ $field_name = $config->{indexer}->{$field}->{name_singular};
+ } elsif ($config->{indexer}->{$field}->{name_plural}) {
+ $field_name = $config->{indexer}->{$field}->{name_plural};
+ } elsif ($config->{indexer}->{$field}->{name}) {
+ $field_name = $config->{indexer}->{$field}->{name};
+ } else {
+ print STDERR "WARNING: field '$field' doesn't have 'name' attribute!";
+ }
+ if ($field_name) {
+ if (! $last_field_name) {
+ $last_field_name = x($field_name);
+ return $last_field_name;
+ } elsif ($field_name ne $last_field_name) {
+ $last_field_name = x($field_name);
+ return $last_field_name;
+ }
+ }