r4266 - in /packages/libsub-install-perl/trunk: Changes LICENSE MANIFEST META.yml Makefile.PL debian/changelog lib/Sub/Install.pm t/perl-critic.t

gregoa-guest at users.alioth.debian.org gregoa-guest at users.alioth.debian.org
Sun Nov 19 18:46:40 CET 2006


Author: gregoa-guest
Date: Sun Nov 19 18:46:40 2006
New Revision: 4266

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=4266
Log:
* New upstream release.

Added:
    packages/libsub-install-perl/trunk/LICENSE
      - copied unchanged from r4265, packages/libsub-install-perl/branches/upstream/current/LICENSE
    packages/libsub-install-perl/trunk/t/perl-critic.t
      - copied unchanged from r4265, packages/libsub-install-perl/branches/upstream/current/t/perl-critic.t
Modified:
    packages/libsub-install-perl/trunk/Changes
    packages/libsub-install-perl/trunk/MANIFEST
    packages/libsub-install-perl/trunk/META.yml
    packages/libsub-install-perl/trunk/Makefile.PL
    packages/libsub-install-perl/trunk/debian/changelog
    packages/libsub-install-perl/trunk/lib/Sub/Install.pm

Modified: packages/libsub-install-perl/trunk/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libsub-install-perl/trunk/Changes?rev=4266&op=diff
==============================================================================
--- packages/libsub-install-perl/trunk/Changes (original)
+++ packages/libsub-install-perl/trunk/Changes Sun Nov 19 18:46:40 2006
@@ -1,4 +1,7 @@
 Revision history for Sub-Install
+
+0.924   2006-11-13
+        packaging improvements
 
 0.922   2006-07-21
         fix filename-matching in output tests for win32 (20617, thanks Jerry

Modified: packages/libsub-install-perl/trunk/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libsub-install-perl/trunk/MANIFEST?rev=4266&op=diff
==============================================================================
--- packages/libsub-install-perl/trunk/MANIFEST (original)
+++ packages/libsub-install-perl/trunk/MANIFEST Sun Nov 19 18:46:40 2006
@@ -14,4 +14,6 @@
 t/reinstall.t
 t/SI_install.t
 t/SI_reinstall.t
+t/perl-critic.t
+LICENSE
 META.yml                                 Module meta-data (added by MakeMaker)

Modified: packages/libsub-install-perl/trunk/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libsub-install-perl/trunk/META.yml?rev=4266&op=diff
==============================================================================
--- packages/libsub-install-perl/trunk/META.yml (original)
+++ packages/libsub-install-perl/trunk/META.yml Sun Nov 19 18:46:40 2006
@@ -1,12 +1,15 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
-name:         Sub-Install
-version:      0.922
-version_from: lib/Sub/Install.pm
-installdirs:  site
-requires:
+--- #YAML:1.0
+name:                Sub-Install
+version:             0.924
+abstract:            install subroutines into packages easily
+license:             perl
+generated_by:        ExtUtils::MakeMaker version 6.31
+distribution_type:   module
+requires:     
     Scalar::Util:                  0
     Test::More:                    0
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.30
+meta-spec:
+    url:     http://module-build.sourceforge.net/META-spec-v1.2.html
+    version: 1.2
+author:
+    - Ricardo Signes <rjbs at cpan.org>

Modified: packages/libsub-install-perl/trunk/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libsub-install-perl/trunk/Makefile.PL?rev=4266&op=diff
==============================================================================
--- packages/libsub-install-perl/trunk/Makefile.PL (original)
+++ packages/libsub-install-perl/trunk/Makefile.PL Sun Nov 19 18:46:40 2006
@@ -7,6 +7,7 @@
     AUTHOR              => 'Ricardo Signes <rjbs at cpan.org>',
     VERSION_FROM        => 'lib/Sub/Install.pm',
     ABSTRACT_FROM       => 'lib/Sub/Install.pm',
+    LICENSE             => 'perl',
     PL_FILES            => {},
     PREREQ_PM => {
         'Scalar::Util' => 0,

Modified: packages/libsub-install-perl/trunk/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libsub-install-perl/trunk/debian/changelog?rev=4266&op=diff
==============================================================================
--- packages/libsub-install-perl/trunk/debian/changelog (original)
+++ packages/libsub-install-perl/trunk/debian/changelog Sun Nov 19 18:46:40 2006
@@ -1,3 +1,9 @@
+libsub-install-perl (0.924-1) unstable; urgency=low
+
+  * New upstream release.
+
+ -- gregor herrmann <gregor+debian at comodo.priv.at>  Sun, 19 Nov 2006 18:43:55 +0100
+
 libsub-install-perl (0.922-1) unstable; urgency=low
 
   * New upstream release

Modified: packages/libsub-install-perl/trunk/lib/Sub/Install.pm
URL: http://svn.debian.org/wsvn/pkg-perl/packages/libsub-install-perl/trunk/lib/Sub/Install.pm?rev=4266&op=diff
==============================================================================
--- packages/libsub-install-perl/trunk/lib/Sub/Install.pm (original)
+++ packages/libsub-install-perl/trunk/lib/Sub/Install.pm Sun Nov 19 18:46:40 2006
@@ -12,13 +12,13 @@
 
 =head1 VERSION
 
-version 0.922
-
- $Id: /my/rjbs/subinst/trunk/lib/Sub/Install.pm 16622 2005-11-23T00:17:55.304991Z rjbs  $
-
-=cut
-
-our $VERSION = '0.922';
+version 0.924
+
+ $Id: /my/cs/projects/subinst/trunk/lib/Sub/Install.pm 27898 2006-11-13T15:29:46.377747Z rjbs  $
+
+=cut
+
+our $VERSION = '0.924';
 
 =head1 SYNOPSIS
 
@@ -97,8 +97,9 @@
 
 # See also Params::Util, to which this code was donated.
 sub _CODELIKE {
-  (Scalar::Util::reftype($_[0])||'') eq 'CODE' or Scalar::Util::blessed($_[0])
-    and overload::Method($_[0],'&{}') ? $_[0] : undef;
+  (Scalar::Util::reftype($_[0])||'') eq 'CODE'
+  || Scalar::Util::blessed($_[0])
+  && (overload::Method($_[0],'&{}') ? $_[0] : undef);
 }
 
 # do the heavy lifting
@@ -154,7 +155,7 @@
   my $wants_code = sub {
     my $code = shift;
     sub {
-      my $warn = $SIG{__WARN__} ? $SIG{__WARN__} : sub { warn @_ };
+      my $warn = $SIG{__WARN__} ? $SIG{__WARN__} : sub { warn @_ }; ## no critic
       local $SIG{__WARN__} = sub {
         my ($error) = @_;
         for (@{ $arg->{suppress} }) {
@@ -168,7 +169,6 @@
         for (@{ $arg->{carp} }) {
           if (my ($base_error) = $error =~ /\A($_) $eow_re/x) {
             return $warn->(Carp::shortmess $base_error);
-            last;
           }
         }
         ($arg->{default} || $warn)->($error);
@@ -183,7 +183,7 @@
 sub _installer {
   sub {
     my ($pkg, $name, $code) = @_;
-    no strict 'refs';
+    no strict 'refs'; ## no critic ProhibitNoStrict
     *{"$pkg\::$name"} = $code;
     return $code;
   }




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