Released version 0.07

ingydotnet · Jul 18, 2011 · a45771f · a45771f
1 parent b3978a0
commit a45771f
Show file tree

Hide file tree

Showing 5 changed files with 16 additions and 24 deletions.
diff --git a/Changes b/Changes
@@ -1,4 +1,9 @@
 ---
+version: 0.07
+date:    Sun Jul 17 22:52:57 PDT 2011
+changes:
+- Switch to new perl5 API
+---
 version: 0.06
 date:    Sun Jun 12 03:41:59 EST 2011
 changes:

diff --git a/lib/perl5/i.pm b/lib/perl5/i.pm
@@ -1,4 +1,3 @@
-use 5.010_000;
 ##
 # name: perl5::i
 # abstract: perl5 plugin for perl5i
@@ -11,6 +10,7 @@ use 5.010_000;
 # - perl5i::latest
 # - http://gurno.com/adam/ascii/bomb.shtml
 
+use v5.10;
 package perl5::i;
 use strict;
 use warnings;
@@ -22,12 +22,11 @@ use perl5i::latest ();
 # XXX perl5i doesn't make this a runtime dep, but it seems to be so.
 use Time::y2038 20100403 ();
 
-our $VERSION = '0.06';
+use base 'perl5';
 
-sub import {
-    @_ = ('perl5i::latest');
-    goto &perl5i::latest::import;
-}
+our $VERSION = '0.07';
+
+use constant imports => ('perl5i::latest');
 
 1;
 

diff --git a/lib/perl5/i0.pm b/lib/perl5/i0.pm
@@ -8,14 +8,10 @@
 # - perl5::i
 
 package perl5::i0;
-use perl5i::0 v2.6.1 ();
 
-1;
+use base 'perl5';
 
-sub import {
-    @_ = ('perl5i::0');
-    goto &perl5i::0::import;
-}
+use constant imports => ( 'perl5i::0' => 'v2.6.1' );
 
 1;
 

diff --git a/lib/perl5/i1.pm b/lib/perl5/i1.pm
@@ -8,14 +8,10 @@
 # - perl5::i
 
 package perl5::i1;
-use perl5i::1 v2.6.1 ();
 
-1;
+use base 'perl5';
 
-sub import {
-    @_ = ('perl5i::1');
-    goto &perl5i::1::import;
-}
+use constant imports => ( 'perl5i::0' => 'v2.6.1' );
 
 1;
 

diff --git a/lib/perl5/i2.pm b/lib/perl5/i2.pm
@@ -8,14 +8,10 @@
 # - perl5::i
 
 package perl5::i2;
-use perl5i::2 v2.6.1 ();
 
-1;
+use base 'perl5';
 
-sub import {
-    @_ = ('perl5i::2');
-    goto &perl5i::2::import;
-}
+use constant imports => ( 'perl5i::2' => 'v2.6.1' );
 
 1;