From c288a23cfbda56592eb77fdafb8bdf4f0bbc33fa Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 28 Apr 2015 15:21:34 +0200
Subject: [PATCH] program only tag requested on command-line

---
 scripts/program.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scripts/program.pl b/scripts/program.pl
index 921153d..565bb2a 100755
--- a/scripts/program.pl
+++ b/scripts/program.pl
@@ -42,7 +42,7 @@ $Biblio::RFID::debug = $debug;
 
 foreach my $tag ( $rfid->tags, $sid ) {
 	warn "visible $tag\n";
-#	next unless $tag eq $sid;
+	next unless $tag eq $sid;
 	if ( grep { defined $_ } values %$blank ) {
 		my $type = ( grep { $blank->{$_} } keys %$blank )[0];
 		warn "BLANK $type $tag\n";
-- 
2.20.1