Re: $Storable::drop_utf8 is undeclared

Message-ID: <20020711214004.GC291@Bagpuss.unfortu.net>

p4raw-id: //depot/perl@17494

diff --git a/ext/Storable/Storable.xs b/ext/Storable/Storable.xs
index 7e7da22..98e3059 100644 (file)
--- a/ext/Storable/Storable.xs
+++ b/ext/Storable/Storable.xs
@@ -5613,6 +5613,7 @@ PROTOTYPES: ENABLE
 
 BOOT:
     init_perinterp();
+    gv_fetchpv("Storable::drop_utf8",   GV_ADDMULTI, SVt_PV);
 #ifdef DEBUGME
     /* Only disable the used only once warning if we are in debugging mode.  */
     gv_fetchpv("Storable::DEBUGME",   GV_ADDMULTI, SVt_PV);