From 1e5c22d43e68966665fd2ca04a226b036e24c71b Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 9 Aug 2010 16:18:04 +0200
Subject: [PATCH] added --debug flag (repeatable)

---
 scripts/scan.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/scripts/scan.pl b/scripts/scan.pl
index 44156a7..f4ec02a 100755
--- a/scripts/scan.pl
+++ b/scripts/scan.pl
@@ -11,13 +11,16 @@ use RFID::Biblio::RFID501;
 
 my $loop = 0;
 my $reader;
+my $debug = 0;
 
 GetOptions(
 	'loop!'     => \$loop,
 	'reader=s', => \$reader,
+	'debug+'    => \$debug,
 ) || die $!;
 
 my $rfid = RFID::Biblio::Reader->new( $reader );
+$RFID::Biblio::debug = $debug;
 
 do {
 	my @visible = $rfid->tags;
-- 
2.20.1