work without tags in range
authorDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 6 Aug 2010 19:28:34 +0000 (21:28 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 6 Aug 2010 19:28:34 +0000 (21:28 +0200)
t/20-CPR-M02.t

index 1fbf05c..81488b7 100755 (executable)
@@ -11,7 +11,8 @@ BEGIN {
 
 ok( my $o = RFID::Biblio::Reader::CPRM02->new( device => '/dev/ttyUSB0' ), 'new' );
 
 
 ok( my $o = RFID::Biblio::Reader::CPRM02->new( device => '/dev/ttyUSB0' ), 'new' );
 
-ok( my @tags = $o->inventory, 'inventory' );
+my @tags = $o->inventory;
+diag 'inventory ',dump(@tags);
 
 foreach my $tag ( @tags ) {
 
 
 foreach my $tag ( @tags ) {