From f987887d23adbbc950435921d0585c005cb03258 Mon Sep 17 00:00:00 2001
From: Jitka Plesnikova <jplesnik@redhat.com>
Date: Thu, 12 May 2022 12:34:06 +0200
Subject: [PATCH] Upgrade to 3.26

---
 Makefile.PL | 2 +-
 Storable.pm | 2 +-
 Storable.xs | 4 ++--
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/Makefile.PL b/Makefile.PL
index e03e141..b705654 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -29,7 +29,7 @@ WriteMakefile(
                 'ExtUtils::MakeMaker' => '6.31',
             },
             TEST_REQUIRES => {
-                'Test::More' => '0.41',
+                'Test::More' => '0.82',
             },
            )
         : () ),
diff --git a/Storable.pm b/Storable.pm
index 8e6ab25..ef417c6 100644
--- a/Storable.pm
+++ b/Storable.pm
@@ -28,7 +28,7 @@ our @EXPORT_OK = qw(
 our ($canonical, $forgive_me);
 
 BEGIN {
-  our $VERSION = '3.25';
+  our $VERSION = '3.26';
 }
 
 our $recursion_limit;
diff --git a/Storable.xs b/Storable.xs
index 6944b76..53c838c 100644
--- a/Storable.xs
+++ b/Storable.xs
@@ -2187,7 +2187,7 @@ static AV *array_call(pTHX_
     XPUSHs(sv_2mortal(newSViv(cloning)));	/* Cloning flag */
     PUTBACK;
 
-    count = call_sv(hook, G_ARRAY);	/* Go back to Perl code */
+    count = call_sv(hook, G_LIST);	/* Go back to Perl code */
 
     SPAGAIN;
 
@@ -3318,7 +3318,7 @@ static int get_regexp(pTHX_ stcxt_t *cxt, SV* sv, SV **re, SV **flags) {
     XPUSHs(rv);
     PUTBACK;
     /* optimize to call the XS directly later */
-    count = call_sv((SV*)cv, G_ARRAY);
+    count = call_sv((SV*)cv, G_LIST);
     SPAGAIN;
     if (count < 2)
       CROAK(("re::regexp_pattern returned only %d results", (int)count));
-- 
2.34.3