the unpack() formatstring for the uuid (field 0x01) "L<4" didn't

return a hex string, but a number only, which is fine for most
        cases, but isn't a correct Data::UUID representation. Changed back
        to "H*".
This commit is contained in:
git@daemon.de
2013-06-17 11:51:13 +02:00
parent fca71efd62
commit d8365f915b
3 changed files with 14 additions and 4 deletions

View File

@@ -22,7 +22,7 @@ use Data::Dumper;
use Exporter ();
use vars qw(@ISA @EXPORT);
$Crypt::PWSafe3::VERSION = '1.08';
$Crypt::PWSafe3::VERSION = '1.09';
use Crypt::PWSafe3::Field;
use Crypt::PWSafe3::HeaderField;
@@ -952,7 +952,7 @@ and/or modify it under the same terms as Perl itself.
=head1 VERSION
Crypt::PWSafe3 Version 1.08.
Crypt::PWSafe3 Version 1.09.
=cut