Added preliminary filtering
diff --git a/lib/Krawfish/Result.pm b/lib/Krawfish/Result.pm
index 014e4f8..a5d6375 100644
--- a/lib/Krawfish/Result.pm
+++ b/lib/Krawfish/Result.pm
@@ -9,12 +9,13 @@
sub current_match {
my $self = shift;
- return unless defined $self->{doc_id};
+ my $current = $self->current;
+ return unless $current;
return Krawfish::Posting::Match->new(
- doc_id => $self->{doc_id},
- start => $self->{start},
- end => $self->{end},
- payload => $self->{payload}
+ doc_id => $current->doc_id,
+ start => $current->start,
+ end => $current->end,
+ payload => $current->payload
);
};