r44184 - in /trunk/libmodule-scandeps-perl: Changes MANIFEST META.yml debian/changelog debian/control lib/Module/ScanDeps.pm t/16-scan_line.t t/17-private_methods.t

ansgar-guest at users.alioth.debian.org ansgar-guest at users.alioth.debian.org
Thu Sep 17 13:26:57 UTC 2009


Author: ansgar-guest
Date: Thu Sep 17 13:26:50 2009
New Revision: 44184

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=44184
Log:
* New upstream release.
* debian/control: Make build-dep on perl unversioned: oldstable has a
  version more recent than 5.8.0.
* Bump Standards-Version to 3.8.3.

Added:
    trunk/libmodule-scandeps-perl/t/16-scan_line.t
      - copied unchanged from r44182, branches/upstream/libmodule-scandeps-perl/current/t/16-scan_line.t
    trunk/libmodule-scandeps-perl/t/17-private_methods.t
      - copied unchanged from r44182, branches/upstream/libmodule-scandeps-perl/current/t/17-private_methods.t
Modified:
    trunk/libmodule-scandeps-perl/Changes
    trunk/libmodule-scandeps-perl/MANIFEST
    trunk/libmodule-scandeps-perl/META.yml
    trunk/libmodule-scandeps-perl/debian/changelog
    trunk/libmodule-scandeps-perl/debian/control
    trunk/libmodule-scandeps-perl/lib/Module/ScanDeps.pm

Modified: trunk/libmodule-scandeps-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-scandeps-perl/Changes?rev=44184&op=diff
==============================================================================
--- trunk/libmodule-scandeps-perl/Changes (original)
+++ trunk/libmodule-scandeps-perl/Changes Thu Sep 17 13:26:50 2009
@@ -1,3 +1,10 @@
+[Changes for 0.95 - 2009-10-16]
+* Fix "uninitialized value" warnings (Dave Rolsky)
+* Add special case for Perl::Critic (Alexandr Ciornii)
+* Add special case for Event (Alexandr Ciornii)
+* Add special case for Wx.pm (Alexandr Ciornii)
+* Add special case for Log::Any
+
 [Changes for 0.94 - 2009-08-10]
 * Add tests for scan_line (Alexandr Ciornii)
 * RT#48151 fixed, "require __PACKAGE__" should not die (Alexandr Ciornii)

Modified: trunk/libmodule-scandeps-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-scandeps-perl/MANIFEST?rev=44184&op=diff
==============================================================================
--- trunk/libmodule-scandeps-perl/MANIFEST (original)
+++ trunk/libmodule-scandeps-perl/MANIFEST Thu Sep 17 13:26:50 2009
@@ -25,6 +25,8 @@
 t/13-static_prefork_test.t
 t/14-scan_chunk.t
 t/14-static_functional_cached.t
+t/16-scan_line.t
+t/17-private_methods.t
 t/2-static_functional_interface_fake.t
 t/3-static_oo_interface_real.t
 t/4-static_functional_interface_options_fake.t

Modified: trunk/libmodule-scandeps-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-scandeps-perl/META.yml?rev=44184&op=diff
==============================================================================
--- trunk/libmodule-scandeps-perl/META.yml (original)
+++ trunk/libmodule-scandeps-perl/META.yml Thu Sep 17 13:26:50 2009
@@ -27,4 +27,4 @@
 resources:
   license: http://dev.perl.org/licenses/
   repository: http://svn.openfoundry.org/par/Module-ScanDeps/trunk/
-version: 0.94
+version: 0.95

Modified: trunk/libmodule-scandeps-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-scandeps-perl/debian/changelog?rev=44184&op=diff
==============================================================================
--- trunk/libmodule-scandeps-perl/debian/changelog (original)
+++ trunk/libmodule-scandeps-perl/debian/changelog Thu Sep 17 13:26:50 2009
@@ -1,3 +1,12 @@
+libmodule-scandeps-perl (0.95-1) unstable; urgency=low
+
+  * New upstream release.
+  * debian/control: Make build-dep on perl unversioned: oldstable has a
+    version more recent than 5.8.0.
+  * Bump Standards-Version to 3.8.3.
+
+ -- Ansgar Burchardt <ansgar at 43-1.org>  Thu, 17 Sep 2009 15:26:13 +0200
+
 libmodule-scandeps-perl (0.94-1) unstable; urgency=low
 
   * New upstream release

Modified: trunk/libmodule-scandeps-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-scandeps-perl/debian/control?rev=44184&op=diff
==============================================================================
--- trunk/libmodule-scandeps-perl/debian/control (original)
+++ trunk/libmodule-scandeps-perl/debian/control Thu Sep 17 13:26:50 2009
@@ -3,7 +3,7 @@
 Priority: optional
 Build-Depends: debhelper (>= 7.0.50), quilt (>= 0.46-7)
 Build-Depends-Indep: libmodule-pluggable-perl, libprefork-perl, libtest-pod-perl,
- perl (>= 5.8.0-7), perl-modules (>= 5.9.4),
+ perl, perl-modules (>= 5.9.4),
  perl-modules (>= 5.10) | libversion-perl,
  perl-modules (>= 5.10.0) | libmodule-build-perl (>= 0.28)
 Uploaders: Gunnar Wolf <gwolf at debian.org>,
@@ -14,7 +14,7 @@
 Homepage: http://search.cpan.org/dist/Module-ScanDeps/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libmodule-scandeps-perl/
 Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libmodule-scandeps-perl/
-Standards-Version: 3.8.2
+Standards-Version: 3.8.3
 
 Package: libmodule-scandeps-perl
 Architecture: all

Modified: trunk/libmodule-scandeps-perl/lib/Module/ScanDeps.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmodule-scandeps-perl/lib/Module/ScanDeps.pm?rev=44184&op=diff
==============================================================================
--- trunk/libmodule-scandeps-perl/lib/Module/ScanDeps.pm (original)
+++ trunk/libmodule-scandeps-perl/lib/Module/ScanDeps.pm Thu Sep 17 13:26:50 2009
@@ -4,7 +4,7 @@
 use warnings;
 use vars qw( $VERSION @EXPORT @EXPORT_OK @ISA $CurrentPackage @IncludeLibs $ScanFileRE );
 
-$VERSION   = '0.94';
+$VERSION   = '0.95';
 @EXPORT    = qw( scan_deps scan_deps_runtime );
 @EXPORT_OK = qw( scan_line scan_chunk add_deps scan_deps_runtime path_to_inc_name );
 
@@ -275,6 +275,7 @@
         termios.ph asm/termios.ph sys/termiox.ph sys/termios.ph sys/ttycom.ph
     ) ],
     'Email/Send.pm' => 'sub',
+    'Event.pm' => [ map {"Event/$_.pm" } qw(idle io signal timer var)],
     'ExtUtils/MakeMaker.pm' => sub {
         grep /\bMM_/, _glob_in_inc('ExtUtils', 1);
     },
@@ -303,6 +304,7 @@
     ) ],
     'IO/Socket.pm'     => [qw( IO/Socket/UNIX.pm )],
     'Log/Log4perl.pm' => 'sub',
+    'Log/Any.pm' => 'sub',
     'LWP/UserAgent.pm' => sub {
         return(
             qw(
@@ -340,6 +342,7 @@
     'Net/SSH/Perl.pm'               => 'sub',
     'PAR/Repository.pm'             => 'sub',
     'PAR/Repository/Client.pm'      => 'sub',
+    'Perl/Critic.pm'                => 'sub', #not only Perl/Critic/Policy
     'PDF/API2/Resource/Font.pm'     => 'sub',
     'PDF/API2/Basic/TTF/Font.pm'    => sub {
         _glob_in_inc('PDF/API2/Basic/TTF', 1);
@@ -401,6 +404,7 @@
     'Win32/Exe.pm'         => 'sub',
     'Win32/TieRegistry.pm' => [qw( Win32API/Registry.pm )],
     'Win32/SystemInfo.pm'  => [qw( Win32/cpuspd.dll )],
+    'Wx.pm'  => [qw( attributes.pm Alien/wxWidgets/msw_2_8_10_uni_gcc_3_4/lib/wxbase28u_gcc_custom.dll)], #still cannot find this .dll
     'XML/Parser.pm'        => sub {
         _glob_in_inc('XML/Parser/Style', 1),
         _glob_in_inc('XML/Parser/Encodings', 1),
@@ -647,7 +651,7 @@
    
     while ($recurse) {
         my $count = keys %$rv;
-        my @files = sort grep -T $_->{file}, values %$rv;
+        my @files = sort grep { defined $_->{file} && -T $_->{file} } values %$rv;
         scan_deps_static({
             files    => [ map $_->{file}, @files ],
             keys     => [ map $_->{key},  @files ],
@@ -1007,9 +1011,11 @@
                 next if $_->{name} =~ m/(?:^|\/)\.(?:exists|packlist)$/;
                 my ($ext,$type);
                 $ext = lc($1) if $_->{name} =~ /(\.[^.]+)$/;
-                next if $ext eq lc(lib_ext());
-                $type = 'shared' if $ext eq lc(dl_ext());
-                $type = 'autoload' if ($ext eq '.ix' or $ext eq '.al');
+                if (defined $ext) {
+                    next if $ext eq lc(lib_ext());
+                    $type = 'shared' if $ext eq lc(dl_ext());
+                    $type = 'autoload' if ($ext eq '.ix' or $ext eq '.al');
+                }
                 $type ||= 'data';
 
                 _add_info( rv     => $rv,        module  => "auto/$path/$_->{name}",
@@ -1023,6 +1029,7 @@
 
 sub _find_in_inc {
     my $file = shift;
+    return unless defined $file;
 
     foreach my $dir (grep !/\bBSDPAN\b/, @INC, @IncludeLibs) {
         return "$dir/$file" if -f "$dir/$file";




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