_invalidate_tag when it leaves reader range

[Biblio-RFID.git] / lib / RFID / Biblio / Reader.pm

diff --git a/lib/RFID/Biblio/Reader.pm b/lib/RFID/Biblio/Reader.pm
index c7ee687..e99a35f 100644 (file)
--- a/lib/RFID/Biblio/Reader.pm
+++ b/lib/RFID/Biblio/Reader.pm
@@ -66,6 +66,7 @@ sub tags {
 
                foreach my $tag ( grep { $self->{inventory}->{$_} == 0 } keys %{ $self->{inventory} } ) {
                        $triggers->{leave}->( $self, $tag ) if $triggers->{leave};
+                       $self->_invalidate_tag( $tag );
                }
 
        }