r76170 - in /trunk/libemail-sender-transport-smtp-tls-perl/debian/patches: ./ series tests.patch

fabreg-guest at users.alioth.debian.org fabreg-guest at users.alioth.debian.org
Sun Jun 19 21:10:25 UTC 2011


Author: fabreg-guest
Date: Sun Jun 19 21:10:16 2011
New Revision: 76170

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=76170
Log:
Added tests.patch

Added:
    trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/
    trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/series
    trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/tests.patch

Added: trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/series?rev=76170&op=file
==============================================================================
--- trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/series (added)
+++ trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/series Sun Jun 19 21:10:16 2011
@@ -1,0 +1,1 @@
+tests.patch

Added: trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/tests.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/tests.patch?rev=76170&op=file
==============================================================================
--- trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/tests.patch (added)
+++ trunk/libemail-sender-transport-smtp-tls-perl/debian/patches/tests.patch Sun Jun 19 21:10:16 2011
@@ -1,0 +1,40 @@
+Description: Fixing failed test.
+Author: Fabrizio Regalli <fabreg at fabreg.it>
+Last-Update: 2011-06-19
+Forwarded: 
+
+--- a/t/00-compile.t
++++ b/t/00-compile.t
+@@ -7,7 +7,7 @@
+ 
+ 
+ 
+-  use File::Find;
++use File::Find;
+ use File::Temp qw{ tempdir };
+ 
+ my @modules;
+@@ -19,6 +19,7 @@
+         $found =~ s{[/\\]}{::}g;
+         $found =~ s/\.pm$//;
+         # nothing to skip push @modules, $found;
++	push @modules, $found;
+     },
+     'lib',
+ );
+@@ -30,6 +31,7 @@
+             return unless -f;
+             my $found = $File::Find::name;
+             # nothing to skip push @scripts, $found;
++	    push @scripts, $found;
+         },
+         'bin',
+     );
+@@ -42,6 +44,7 @@
+ 
+     # fake home for cpan-testers
+     # no fake requested ## local $ENV{HOME} = tempdir( CLEANUP => 1 );
++    local $ENV{HOME} = tempdir( CLEANUP => 1 );
+ 
+     like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" },
+         qr/^\s*$_ ok/s, "$_ loaded ok" )




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