X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=t%2F20-CPR-M02.t;h=9e85f613ad1e74ae449f271185a601e5f8d5f98d;hb=dd0ff7b7d37f0dcf436cd6921f8ffcaa16332a24;hp=54c4a5dc306bd6eb11123b99b5a136d4b194527f;hpb=7832e5544c3d3e1535e3f019c939947265a0a7ae;p=Biblio-RFID.git diff --git a/t/20-CPR-M02.t b/t/20-CPR-M02.t index 54c4a5d..9e85f61 100755 --- a/t/20-CPR-M02.t +++ b/t/20-CPR-M02.t @@ -6,12 +6,15 @@ use Data::Dump qw(dump); use lib 'lib'; BEGIN { - use_ok( 'RFID::Serial::CPRM02' ); + use_ok( 'RFID::Biblio::CPRM02' ); } -ok( my $o = RFID::Serial::CPRM02->new( device => '/dev/ttyUSB0' ), 'new' ); +ok( my $o = RFID::Biblio::CPRM02->new( device => '/dev/ttyUSB0' ), 'new' ); ok( my @tags = $o->inventory, 'inventory' ); ok( my $blocks = $o->read_blocks( $_ ), "read_blocks $_" ) foreach @tags; +ok( my $visible = $o->scan, 'scan' ); +diag dump $visible; +