r65379 - in /branches/upstream/libtry-tiny-perl/current: Changes META.yml lib/Try/Tiny.pm t/finally.t t/given_when.t
carnil at users.alioth.debian.org
carnil at users.alioth.debian.org
Mon Nov 29 08:19:18 UTC 2010
Author: carnil
Date: Mon Nov 29 08:13:12 2010
New Revision: 65379
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=65379
Log:
[svn-upgrade] new version libtry-tiny-perl (0.09)
Modified:
branches/upstream/libtry-tiny-perl/current/Changes
branches/upstream/libtry-tiny-perl/current/META.yml
branches/upstream/libtry-tiny-perl/current/lib/Try/Tiny.pm
branches/upstream/libtry-tiny-perl/current/t/finally.t
branches/upstream/libtry-tiny-perl/current/t/given_when.t
Modified: branches/upstream/libtry-tiny-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtry-tiny-perl/current/Changes?rev=65379&op=diff
==============================================================================
--- branches/upstream/libtry-tiny-perl/current/Changes (original)
+++ branches/upstream/libtry-tiny-perl/current/Changes Mon Nov 29 08:13:12 2010
@@ -1,3 +1,9 @@
+0.09
+ - don't index Try::Tiny::ScopeGuard
+
+0.08
+ - fix require vs use issue in blead (RT63410)
+
0.07
- allow multiple finally blocks
- pass the error, if any, to finally blocks when called
Modified: branches/upstream/libtry-tiny-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtry-tiny-perl/current/META.yml?rev=65379&op=diff
==============================================================================
--- branches/upstream/libtry-tiny-perl/current/META.yml (original)
+++ branches/upstream/libtry-tiny-perl/current/META.yml Mon Nov 29 08:13:12 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Try-Tiny
-version: 0.07
+version: 0.09
abstract: ~
author: []
license: unknown
Modified: branches/upstream/libtry-tiny-perl/current/lib/Try/Tiny.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtry-tiny-perl/current/lib/Try/Tiny.pm?rev=65379&op=diff
==============================================================================
--- branches/upstream/libtry-tiny-perl/current/lib/Try/Tiny.pm (original)
+++ branches/upstream/libtry-tiny-perl/current/lib/Try/Tiny.pm Mon Nov 29 08:13:12 2010
@@ -10,7 +10,7 @@
@ISA = qw(Exporter);
}
-$VERSION = "0.07";
+$VERSION = "0.09";
$VERSION = eval $VERSION;
@@ -130,7 +130,8 @@
}
{
- package Try::Tiny::ScopeGuard;
+ package # hide from PAUSE
+ Try::Tiny::ScopeGuard;
sub _new {
shift;
Modified: branches/upstream/libtry-tiny-perl/current/t/finally.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtry-tiny-perl/current/t/finally.t?rev=65379&op=diff
==============================================================================
--- branches/upstream/libtry-tiny-perl/current/t/finally.t (original)
+++ branches/upstream/libtry-tiny-perl/current/t/finally.t Mon Nov 29 08:13:12 2010
@@ -3,7 +3,7 @@
use strict;
#use warnings;
-use Test::More tests => 12;
+use Test::More tests => 13;
BEGIN { use_ok 'Try::Tiny' };
@@ -62,4 +62,16 @@
is_deeply(\@_, [ "Die\n" ], "finally got passed the exception");
};
+try {
+ try {
+ die "foo";
+ }
+ catch {
+ die "bar";
+ }
+ finally {
+ pass("finally called");
+ };
+};
+
1;
Modified: branches/upstream/libtry-tiny-perl/current/t/given_when.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtry-tiny-perl/current/t/given_when.t?rev=65379&op=diff
==============================================================================
--- branches/upstream/libtry-tiny-perl/current/t/given_when.t (original)
+++ branches/upstream/libtry-tiny-perl/current/t/given_when.t Mon Nov 29 08:13:12 2010
@@ -10,6 +10,8 @@
plan tests => 3;
use_ok("Try::Tiny");
}
+
+use 5.010;
my ( $error, $topic );
More information about the Pkg-perl-cvs-commits
mailing list