--- trunk/all2xml.pl 2003/07/13 21:57:12 97 +++ trunk/all2xml.pl 2003/07/13 22:29:14 98 @@ -82,17 +82,17 @@ # sort subrouting using order="" attribute sub by_order { - return 0 if (! $config->{indexer}->{$a}->{order}); - return 0 if (! $config->{indexer}->{$b}->{order}); + my $va = $config->{indexer}->{$a}->{order} || + $config->{indexer}->{$a}; + my $vb = $config->{indexer}->{$b}->{order} || + $config->{indexer}->{$b}; - return $config->{indexer}->{$a}->{order} <=> - $config->{indexer}->{$b}->{order} ; + return $va <=> $vb; } foreach my $field (sort by_order keys %{$config->{indexer}}) { $field=x($field); - $field_usage{$field}++; my $swish_data = "";