X-Git-Url: http://git.rot13.org/?p=Biblio-RFID.git;a=blobdiff_plain;f=lib%2FRFID%2FBiblio%2FRFID501.pm;h=760fe24f81643e91db632c58c7c0ed5030f99275;hp=dc30fe85038762a13befbbdb48a6a7472bd702bf;hb=a14ea0fdd9615a190c7cb1d4e711999d31f9371b;hpb=ce9d70e4bf2232ea3d444c1930cb6fd8be34096c diff --git a/lib/RFID/Biblio/RFID501.pm b/lib/RFID/Biblio/RFID501.pm index dc30fe8..760fe24 100644 --- a/lib/RFID/Biblio/RFID501.pm +++ b/lib/RFID/Biblio/RFID501.pm @@ -118,7 +118,10 @@ sub to_hash { } sub from_hash { - my ( $self, $hash ) = @_; + my $self = shift; + my $hash = {@_}; + + warn "## from_hash ",dump($hash); return pack('C4Z16Nl>l', 0x04,