r41384 - in /branches/upstream/libaliased-perl/current: Build.PL Changes MANIFEST META.yml Makefile.PL lib/aliased.pm

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Thu Aug 6 02:39:45 UTC 2009


Author: jawnsy-guest
Date: Thu Aug  6 02:39:31 2009
New Revision: 41384

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=41384
Log:
[svn-upgrade] Integrating new upstream version, libaliased-perl (0.30)

Modified:
    branches/upstream/libaliased-perl/current/Build.PL
    branches/upstream/libaliased-perl/current/Changes
    branches/upstream/libaliased-perl/current/MANIFEST
    branches/upstream/libaliased-perl/current/META.yml
    branches/upstream/libaliased-perl/current/Makefile.PL
    branches/upstream/libaliased-perl/current/lib/aliased.pm

Modified: branches/upstream/libaliased-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libaliased-perl/current/Build.PL?rev=41384&op=diff
==============================================================================
--- branches/upstream/libaliased-perl/current/Build.PL (original)
+++ branches/upstream/libaliased-perl/current/Build.PL Thu Aug  6 02:39:31 2009
@@ -7,11 +7,11 @@
     license             => 'perl',
     dist_author         => 'Curtis "Ovid" Poe <ovid at cpan.org>',
     dist_version_from   => 'lib/aliased.pm',
-    perl                => 5.006,
     requires => {
         'Test::More' => 0,
     },
     add_to_cleanup      => [ 'aliased-*' ],
+    create_makefile_pl  => 'traditional',
 );
 
 $builder->create_build_script();

Modified: branches/upstream/libaliased-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libaliased-perl/current/Changes?rev=41384&op=diff
==============================================================================
--- branches/upstream/libaliased-perl/current/Changes (original)
+++ branches/upstream/libaliased-perl/current/Changes Thu Aug  6 02:39:31 2009
@@ -1,6 +1,10 @@
-Revision history for Perl extension aliased.
+Revision history for Perl extension aka.
 
-0.21  12 February, 2008
+0.30  5 August, 2009
+      Applied changes from Florian Ragwitz to ensure that we preserve the 
+      name of the package the alias is defined in.
+
+0.22  12 February, 2008
       Preserve $SIG{__DIE__} behavior just as if aliased had not been used.
 
 0.21  29 March, 2007

Modified: branches/upstream/libaliased-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libaliased-perl/current/MANIFEST?rev=41384&op=diff
==============================================================================
--- branches/upstream/libaliased-perl/current/MANIFEST (original)
+++ branches/upstream/libaliased-perl/current/MANIFEST Thu Aug  6 02:39:31 2009
@@ -8,8 +8,8 @@
 t/10aliased.t
 t/20import.t
 t/30sigdie.t
+t/lib/HasSigDie.pm
 t/lib/BadSigDie.pm
-t/lib/HasSigDie.pm
 t/lib/NoSigDie.pm
 t/lib/Really/Long/Module/Conflicting/Name.pm
 t/lib/Really/Long/Module/Name.pm

Modified: branches/upstream/libaliased-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libaliased-perl/current/META.yml?rev=41384&op=diff
==============================================================================
--- branches/upstream/libaliased-perl/current/META.yml (original)
+++ branches/upstream/libaliased-perl/current/META.yml Thu Aug  6 02:39:31 2009
@@ -1,19 +1,19 @@
 ---
 name: aliased
-version: 0.22
+version: 0.30
 author:
   - 'Curtis "Ovid" Poe <ovid at cpan.org>'
 abstract: Use shorter versions of class names.
 license: perl
 resources:
-  license: http://dev.perl.org/licenses/
+  license: ~
 requires:
   Test::More: 0
 provides:
   aliased:
     file: lib/aliased.pm
-    version: 0.22
-generated_by: Module::Build version 0.2808
+    version: 0.30
+generated_by: Module::Build version 0.32
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.2.html
   version: 1.2

Modified: branches/upstream/libaliased-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libaliased-perl/current/Makefile.PL?rev=41384&op=diff
==============================================================================
--- branches/upstream/libaliased-perl/current/Makefile.PL (original)
+++ branches/upstream/libaliased-perl/current/Makefile.PL Thu Aug  6 02:39:31 2009
@@ -1,15 +1,7 @@
-# Note: this file was auto-generated by Module::Build::Compat version 0.03
+# Note: this file was auto-generated by Module::Build::Compat version 0.32
 use ExtUtils::MakeMaker;
-
-eval "use 5.006";
-if (my $error = $@) {
-    warn $error;
-    exit 0;
-}
-
 WriteMakefile
 (
-          'PL_FILES' => {},
           'INSTALLDIRS' => 'site',
           'NAME' => 'aliased',
           'EXE_FILES' => [],

Modified: branches/upstream/libaliased-perl/current/lib/aliased.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libaliased-perl/current/lib/aliased.pm?rev=41384&op=diff
==============================================================================
--- branches/upstream/libaliased-perl/current/lib/aliased.pm (original)
+++ branches/upstream/libaliased-perl/current/lib/aliased.pm Thu Aug  6 02:39:31 2009
@@ -1,5 +1,5 @@
 package aliased;
-$VERSION = '0.22';
+$VERSION = '0.30';
 
 require Exporter;
 @ISA    = qw(Exporter);
@@ -32,12 +32,8 @@
 
     $alias ||= _get_alias($package);
 
-    local $SIG{__DIE__};
-    eval qq{
-        package $callpack;
-        sub $alias () { '$package' }
-    };
-    die $@ if $@;
+    no strict 'refs';
+    *{ join q{::} => $callpack, $alias } = sub () { $package };
 }
 
 sub _load_alias {
@@ -47,15 +43,16 @@
     # restoring its value if there is a failure.  Very, very tricky.
     my $sigdie = $SIG{__DIE__};
     {
-        my $code = @import == 0
+        my $code =
+          @import == 0
           ? "package $callpack; use $package;"
           : "package $callpack; use $package (\@import)";
         eval $code;
-        if (my $error = $@) {
+        if ( my $error = $@ ) {
             $SIG{__DIE__} = $sigdie;
             die $error;
         }
-        $sigdie = $SIG{__DIE__} 
+        $sigdie = $SIG{__DIE__}
           if defined $SIG{__DIE__};
     }
 
@@ -78,6 +75,10 @@
 =head1 NAME
 
 aliased - Use shorter versions of class names.
+
+=head1 VERSION
+
+0.30
 
 =head1 SYNOPSIS
 




More information about the Pkg-perl-cvs-commits mailing list