From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 29 Jul 2010 12:07:19 +0000 (+0200)
Subject: --only now accepts just part of name
X-Git-Tag: RFID-Biblio-0.02~124
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=485c76be8389ede166cf9fef4e96841e95baf490;hp=dd0ff7b7d37f0dcf436cd6921f8ffcaa16332a24;p=Biblio-RFID.git

--only now accepts just part of name
---

diff --git a/scripts/scan.pl b/scripts/scan.pl
index 47da568..605b82e 100755
--- a/scripts/scan.pl
+++ b/scripts/scan.pl
@@ -18,7 +18,7 @@ my @readers = ( '3M810', 'CPRM02' );
 my @rfid;
 
 foreach my $reader ( @readers ) {
-	next if $only && $only ne $reader;
+	next if $reader !~ /$only/i && $only ne $reader;
 	my $module = "RFID::Biblio::$reader";
 	eval "use $module";
 	die $@ if $@;