From 62ba9ce7ace0b68c581a7c5210299ea424dcb1cf Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Fri, 6 Aug 2010 17:41:29 +0200
Subject: [PATCH] use RFID::Biblio::Readers->new

---
 scripts/RFID-JSONP-server.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scripts/RFID-JSONP-server.pl b/scripts/RFID-JSONP-server.pl
index 176d7e6..f374bd4 100755
--- a/scripts/RFID-JSONP-server.pl
+++ b/scripts/RFID-JSONP-server.pl
@@ -33,8 +33,8 @@ GetOptions(
 use lib 'lib';
 use RFID::Biblio::RFID501;
 use RFID::Biblio::Readers;
-my $rfid = (RFID::Biblio::Readers->available( $reader ))[0]; # FIXME
-warn "using $rfid reader\n";
+my $rfid = RFID::Biblio::Readers->new( shift @ARGV );
+warn "using readers: ",dump( $rfid->_available );
 
 my $index_html;
 {
-- 
2.20.1