X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-File-KDBX;a=blobdiff_plain;f=t%2Fkdbx4.t;fp=t%2Fkdbx4.t;h=d82dc4b431136e543c2e63549f740033c627a1a7;hp=5afceeb7dd8b7d155d4bfd00ed2879afb744d783;hb=700fa117555b87eda7227f9083c0fc0df052c64f;hpb=608603200ab50a690f944650cbcb2c579f7a3322

diff --git a/t/kdbx4.t b/t/kdbx4.t
index 5afceeb..d82dc4b 100644
--- a/t/kdbx4.t
+++ b/t/kdbx4.t
@@ -111,7 +111,7 @@ subtest 'KDBX4.1 upgrade' => sub {
     is $kdbx->minimum_version, KDBX_VERSION_4_1, 'Icon with name requires upgrade';
     $kdbx->remove_custom_icon($icon_uuid);
     is $kdbx->minimum_version, KDBX_VERSION_3_1, 'Reset upgrade requirement';
-    $icon_uuid = $kdbx->add_custom_icon('data2', last_modification_time => gmtime);
+    $icon_uuid = $kdbx->add_custom_icon('data2', last_modification_time => scalar gmtime);
     is $kdbx->minimum_version, KDBX_VERSION_4_1, 'Icon with modtime requires upgrade';
     $kdbx->remove_custom_icon($icon_uuid);
     is $kdbx->minimum_version, KDBX_VERSION_3_1, 'Reset upgrade requirement';