projects
/
Biblio-RFID.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
disable CPRM02
[Biblio-RFID.git]
/
lib
/
Biblio
/
RFID
/
Reader.pm
diff --git
a/lib/Biblio/RFID/Reader.pm
b/lib/Biblio/RFID/Reader.pm
index
a5f6c94
..
3af9fc4
100644
(file)
--- a/
lib/Biblio/RFID/Reader.pm
+++ b/
lib/Biblio/RFID/Reader.pm
@@
-121,6
+121,18
@@
sub to_hash {
return $hash;
}
return $hash;
}
+=head2 debug
+
+ $self->debug(1); # or more
+
+=cut
+
+sub debug {
+ my ( $self, $level ) = @_;
+ $debug = $level if $level > $debug;
+ warn "debug level $level\n" if $level;
+}
+
=head2 from_reader
my $reader = $self->from_reader( $tag );
=head2 from_reader
my $reader = $self->from_reader( $tag );
@@
-135,7
+147,6
@@
sub from_reader {
return $reader;
}
return $reader;
}
-
=head1 PRIVATE
=head2 _invalidate_tag
=head1 PRIVATE
=head2 _invalidate_tag
@@
-160,7
+171,8
@@
Probe each RFID reader supported and returns succefull ones
=cut
=cut
-my @readers = ( '3M810', 'CPRM02', 'librfid' );
+#my @readers = ( '3M810', 'CPRM02', 'librfid' );
+my @readers = ( '3M810', 'librfid' );
sub _available {
my ( $self, $filter ) = @_;
sub _available {
my ( $self, $filter ) = @_;