voodoo for ancient perls

diff --git a/lib/Try/Tiny.pm b/lib/Try/Tiny.pm
index 53ffa59..665a8e9 100644 (file)
--- a/lib/Try/Tiny.pm
+++ b/lib/Try/Tiny.pm
@@ -1,10 +1,14 @@
 package Try::Tiny;
 
 use strict;
-use warnings;
+#use warnings;
 
-use base qw(Exporter);
-use vars qw(@EXPORT @EXPORT_OK $VERSION);
+use vars qw(@EXPORT @EXPORT_OK $VERSION @ISA);
+
+BEGIN {
+       require Exporter;
+       @ISA = qw(Exporter);
+}
 
 $VERSION = "0.01";
 

diff --git a/t/when.t b/t/when.t
index a411ac5..e6d64e6 100644 (file)
--- a/t/when.t
+++ b/t/when.t
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 
 use strict;
-use warnings;
+#use warnings;
 
 use Test::More;