r39169 - in /trunk/libautodie-perl: Changes META.yml debian/changelog debian/control lib/Fatal.pm lib/autodie.pm lib/autodie/exception.pm lib/autodie/exception/system.pm lib/autodie/hints.pm t/blog_hints.t t/hints.t
ryan52-guest at users.alioth.debian.org
ryan52-guest at users.alioth.debian.org
Thu Jul 2 21:06:52 UTC 2009
Author: ryan52-guest
Date: Thu Jul 2 21:06:45 2009
New Revision: 39169
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39169
Log:
* New upstream version
* Add myself to Uploaders
Modified:
trunk/libautodie-perl/Changes
trunk/libautodie-perl/META.yml
trunk/libautodie-perl/debian/changelog
trunk/libautodie-perl/debian/control
trunk/libautodie-perl/lib/Fatal.pm
trunk/libautodie-perl/lib/autodie.pm
trunk/libautodie-perl/lib/autodie/exception.pm
trunk/libautodie-perl/lib/autodie/exception/system.pm
trunk/libautodie-perl/lib/autodie/hints.pm
trunk/libautodie-perl/t/blog_hints.t
trunk/libautodie-perl/t/hints.t
Modified: trunk/libautodie-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/Changes?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/Changes (original)
+++ trunk/libautodie-perl/Changes Thu Jul 2 21:06:45 2009
@@ -1,4 +1,15 @@
Revision history for autodie
+
+2.04 Thu Jul 2 18:56:57 AUSEST 2009
+
+ * TEST: Removed spurious warning about insufficient credit.
+
+ * TEST: hints.t produces less debugging output when testing
+ the Perl core. (Thanks to Jerry D. Hedden)
+
+ * TEST: hints.t no longer spuriously fails when checking
+ the return values from File::Copy under Windows before
+ Perl 5.10.1. (Thanks to Curtis Jewell)
2.03 Wed Jul 1 15:39:16 AUSEST 2009
Modified: trunk/libautodie-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/META.yml?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/META.yml (original)
+++ trunk/libautodie-perl/META.yml Thu Jul 2 21:06:45 2009
@@ -27,4 +27,4 @@
bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=autodie
license: http://dev.perl.org/licenses/
repository: http://github.com/pfenwick/autodie/tree/master
-version: 2.03
+version: 2.04
Modified: trunk/libautodie-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/debian/changelog?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/debian/changelog (original)
+++ trunk/libautodie-perl/debian/changelog Thu Jul 2 21:06:45 2009
@@ -1,8 +1,13 @@
-libautodie-perl (2.03-2) UNRELEASED; urgency=low
+libautodie-perl (2.04-2) UNRELEASED; urgency=low
+ [ Jonathan Yu ]
* Move TEST_AUTHOR stuff to make lintian happy
- -- Jonathan Yu <frequency at cpan.org> Wed, 01 Jul 2009 10:03:33 -0400
+ [ Ryan Niebur ]
+ * New upstream version
+ * Add myself to Uploaders
+
+ -- Ryan Niebur <ryanryan52 at gmail.com> Thu, 02 Jul 2009 14:02:40 -0700
libautodie-perl (2.03-1) unstable; urgency=low
Modified: trunk/libautodie-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/debian/control?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/debian/control (original)
+++ trunk/libautodie-perl/debian/control Thu Jul 2 21:06:45 2009
@@ -9,7 +9,7 @@
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Jeremiah C. Foster <jeremiah at jeremiahfoster.com>,
Rene Mayorga <rmayorga at debian.org.sv>, Jonathan Yu <frequency at cpan.org>,
- Angel Abad (Ikusnet SLL) <angel at grupoikusnet.com>
+ Angel Abad (Ikusnet SLL) <angel at grupoikusnet.com>, Ryan Niebur <ryanryan52 at gmail.com>
Standards-Version: 3.8.2
Homepage: http://search.cpan.org/dist/autodie/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libautodie-perl/
Modified: trunk/libautodie-perl/lib/Fatal.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/lib/Fatal.pm?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/lib/Fatal.pm (original)
+++ trunk/libautodie-perl/lib/Fatal.pm Thu Jul 2 21:06:45 2009
@@ -39,7 +39,7 @@
use constant MIN_IPC_SYS_SIMPLE_VER => 0.12;
# All the Fatal/autodie modules share the same version number.
-our $VERSION = '2.03';
+our $VERSION = '2.04';
our $Debug ||= 0;
@@ -98,7 +98,7 @@
':2.01' => [qw(:default)],
':2.02' => [qw(:default)],
':2.03' => [qw(:default)],
-
+ ':2.04' => [qw(:default)],
);
$TAGS{':all'} = [ keys %TAGS ];
Modified: trunk/libautodie-perl/lib/autodie.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/lib/autodie.pm?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/lib/autodie.pm (original)
+++ trunk/libautodie-perl/lib/autodie.pm Thu Jul 2 21:06:45 2009
@@ -8,7 +8,7 @@
our $VERSION;
BEGIN {
- $VERSION = '2.03';
+ $VERSION = '2.04';
}
use constant ERROR_WRONG_FATAL => q{
Modified: trunk/libautodie-perl/lib/autodie/exception.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/lib/autodie/exception.pm?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/lib/autodie/exception.pm (original)
+++ trunk/libautodie-perl/lib/autodie/exception.pm Thu Jul 2 21:06:45 2009
@@ -14,7 +14,7 @@
use if ($] >= 5.010), overload => '~~' => "matches";
-our $VERSION = '2.03';
+our $VERSION = '2.04';
my $PACKAGE = __PACKAGE__; # Useful to have a scalar for hash keys.
Modified: trunk/libautodie-perl/lib/autodie/exception/system.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/lib/autodie/exception/system.pm?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/lib/autodie/exception/system.pm (original)
+++ trunk/libautodie-perl/lib/autodie/exception/system.pm Thu Jul 2 21:06:45 2009
@@ -5,7 +5,7 @@
use base 'autodie::exception';
use Carp qw(croak);
-our $VERSION = '2.03';
+our $VERSION = '2.04';
my $PACKAGE = __PACKAGE__;
Modified: trunk/libautodie-perl/lib/autodie/hints.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/lib/autodie/hints.pm?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/lib/autodie/hints.pm (original)
+++ trunk/libautodie-perl/lib/autodie/hints.pm Thu Jul 2 21:06:45 2009
@@ -5,7 +5,7 @@
use constant PERL58 => ( $] < 5.009 );
-our $VERSION = '2.03';
+our $VERSION = '2.04';
=head1 NAME
Modified: trunk/libautodie-perl/t/blog_hints.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/t/blog_hints.t?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/t/blog_hints.t (original)
+++ trunk/libautodie-perl/t/blog_hints.t Thu Jul 2 21:06:45 2009
@@ -28,5 +28,3 @@
is($@->return->[0], undef);
is($@->return->[1], 'Insufficient credit');
like("$@", qr/Insufficient credit/);
-
-warn $@;
Modified: trunk/libautodie-perl/t/hints.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libautodie-perl/t/hints.t?rev=39169&op=diff
==============================================================================
--- trunk/libautodie-perl/t/hints.t (original)
+++ trunk/libautodie-perl/t/hints.t Thu Jul 2 21:06:45 2009
@@ -23,7 +23,7 @@
use autodie qw(fail_on_empty fail_on_false fail_on_undef);
diag("Sub::Identify ", exists( $INC{'Sub/Identify.pm'} ) ? "is" : "is not",
- " loaded");
+ " loaded") if (! $ENV{PERL_CORE});
my $hints = "autodie::hints";
@@ -61,7 +61,14 @@
isa_ok($@, "autodie::exception");
is($@->function, "File::Copy::copy", "Function should be original name");
-is($@->return, 0, "File::Copy returns zero on failure");
+
+SKIP: {
+ skip("File::Copy is weird on Win32 before 5.10.1", 1)
+ if ( ! PERL5101 and $^O eq "MSWin32" );
+
+ is($@->return, 0, "File::Copy returns zero on failure");
+}
+
is($@->context, "scalar", "File::Copy called in scalar context");
# List context test.
@@ -76,7 +83,13 @@
isa_ok($@, "autodie::exception");
is($@->function, "File::Copy::copy", "Function should be original name");
-is_deeply($@->return, [0], "File::Copy returns zero on failure");
+
+SKIP: {
+ skip("File::Copy is weird on Win32 before 5.10.1", 1)
+ if ( ! PERL5101 and $^O eq "MSWin32" );
+
+ is_deeply($@->return, [0], "File::Copy returns zero on failure");
+}
is($@->context, "list", "File::Copy called in list context");
# Tests on loaded funcs.
More information about the Pkg-perl-cvs-commits
mailing list