report number of items returned from sort

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index 8a52a85..71a476f 100644 (file)
--- a/lib/MojoFacets/Data.pm
+++ b/lib/MojoFacets/Data.pm
@@ -560,7 +560,7 @@ sub items {
 
                my $path_filters = $loaded->{$path}->{filters};
 
-               warn "create combined filter for $all_filters\n";
+               warn "create combined filter for $all_filters from ", $#$sorted + 1, " items\n";
 
                my @filtered;
                foreach my $i ( 0 .. $#$sorted ) {