look for reader implementations in correct place

diff --git a/lib/RFID/Biblio/Reader.pm b/lib/RFID/Biblio/Reader.pm
index 5868311..9b3e5cc 100644 (file)
--- a/lib/RFID/Biblio/Reader.pm
+++ b/lib/RFID/Biblio/Reader.pm
@@ -106,7 +106,7 @@ sub _available {
 
        foreach my $reader ( @readers ) {
                next if $filter && $reader !~ /$filter/i;
 
        foreach my $reader ( @readers ) {
                next if $filter && $reader !~ /$filter/i;

-               my $module = "RFID::Biblio::$reader";
+               my $module = "RFID::Biblio::Reader::$reader";

                eval "use $module";
                die $@ if $@;
                if ( my $rfid = $module->new( device => '/dev/ttyUSB0' ) ) {
                eval "use $module";
                die $@ if $@;
                if ( my $rfid = $module->new( device => '/dev/ttyUSB0' ) ) {