From 5bb8c2decfb00205492803ec6558e84d698babd0 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 21 Jul 2017 00:03:25 +0200 Subject: fix test failure with perl-5.26 --- t/01setter-getter.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 't') diff --git a/t/01setter-getter.t b/t/01setter-getter.t index d9a9795..6a316cd 100644 --- a/t/01setter-getter.t +++ b/t/01setter-getter.t @@ -19,8 +19,8 @@ ok($pkg, 'Package'); is($pkg->payload_format, 'cpio', 'payload'); is($pkg->rflags, undef, 'default rflags'); -is($pkg->set_rflags(1, 3), undef, 'storing rflags'); -is(join(',', $pkg->set_rflags(1, 4)), "1,3", 'storing rflags'); +is($pkg->set_rflags('1', '3'), undef, 'storing rflags'); +is(join(',', $pkg->set_rflags('1', '4')), "1,3", 'storing rflags'); is(join(',', $pkg->rflags), "1,4", 'retrieving stored rflags'); ######################################## -- cgit v1.2.1