projects
/
Biblio-RFID.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
0f411f7
)
open usb serial ports and normal serials
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Thu, 9 Oct 2014 14:52:05 +0000
(16:52 +0200)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Thu, 9 Oct 2014 14:52:05 +0000
(16:52 +0200)
lib/Biblio/RFID/Reader/Serial.pm
patch
|
blob
|
history
diff --git
a/lib/Biblio/RFID/Reader/Serial.pm
b/lib/Biblio/RFID/Reader/Serial.pm
index
39282f0
..
f954f39
100644
(file)
--- a/
lib/Biblio/RFID/Reader/Serial.pm
+++ b/
lib/Biblio/RFID/Reader/Serial.pm
@@
-29,7
+29,7
@@
sub new {
=head2 port
=head2 port
-Tries to open usb serial ports C</dev/ttyUSB*>
+Tries to open usb serial ports C</dev/ttyUSB*>
and serial ports C</dev/ttyS*>
my $serial_obj = $self->port;
my $serial_obj = $self->port;
@@
-45,7
+45,7
@@
sub port {
return $self->{port} if defined $self->{port};
my $settings = $self->serial_settings;
return $self->{port} if defined $self->{port};
my $settings = $self->serial_settings;
- my @devices = $ENV{RFID_DEVICE} ? ( $ENV{RFID_DEVICE} ) : glob '/dev/ttyUSB*';
+ my @devices = $ENV{RFID_DEVICE} ? ( $ENV{RFID_DEVICE} ) : glob '/dev/ttyUSB*
/dev/ttyS*
';
warn "# port devices ",dump(@devices);
foreach my $device ( @devices ) {
warn "# port devices ",dump(@devices);
foreach my $device ( @devices ) {