X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=lib%2FFile%2FKDBX%2FLoader%2FKDB.pm;h=685e0a9fcef83242e25d1c8ef39e548a70bfe637;hb=700fa117555b87eda7227f9083c0fc0df052c64f;hp=9feaaacf7e4bb3972fe944266eb9f1d372d3eefd;hpb=c98fc7d0294e641cf8844306808333bdec4fea2f;p=chaz%2Fp5-File-KDBX diff --git a/lib/File/KDBX/Loader/KDB.pm b/lib/File/KDBX/Loader/KDB.pm index 9feaaac..685e0a9 100644 --- a/lib/File/KDBX/Loader/KDB.pm +++ b/lib/File/KDBX/Loader/KDB.pm @@ -11,7 +11,7 @@ use File::KDBX::Util qw(:class :empty :io :uuid load_optional); use File::KDBX; use Ref::Util qw(is_arrayref is_hashref); use Scalar::Util qw(looks_like_number); -use Time::Piece; +use Time::Piece 1.33; use boolean; use namespace::clean; @@ -19,7 +19,7 @@ extends 'File::KDBX::Loader'; our $VERSION = '999.999'; # VERSION -my $DEFAULT_EXPIRATION = Time::Piece->new(32503677839); # 2999-12-31 23:59:59 +my $DEFAULT_EXPIRATION = Time::Piece->strptime('2999-12-31 23:59:59', '%Y-%m-%d %H:%M:%S'); sub _read_headers { '' } @@ -100,7 +100,7 @@ sub convert_keepass_to_kdbx { }) ->each(sub { _read_meta_stream($kdbx, $_); - $_->remove; # TODO do not signal + $_->remove(signal => 0); }); return $kdbx;