remove extra debug output

diff --git a/lib/RFID/Biblio/Reader.pm b/lib/RFID/Biblio/Reader.pm
index 3f02424..88c343f 100644 (file)
--- a/lib/RFID/Biblio/Reader.pm
+++ b/lib/RFID/Biblio/Reader.pm
@@ -77,8 +77,6 @@ sub tags {
 
                }
        
-warn "XXX ## _tags ",dump( $self->{_tags} );
-
                foreach my $tag ( grep { $self->{_tags}->{$_}->{time} == 0 } keys %{ $self->{_tags} } ) {
                        $triggers->{leave}->( $self, $tag ) if $triggers->{leave};
                        $self->_invalidate_tag( $tag );