add test for finally being called when catch dies

diff --git a/t/finally.t b/t/finally.t
index 622fce8..80af9e5 100644 (file)
--- a/t/finally.t
+++ b/t/finally.t
@@ -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 @@ try {
   is_deeply(\@_, [ "Die\n" ], "finally got passed the exception");
 };
 
+try {
+    try {
+        die "foo";
+    }
+    catch {
+        die "bar";
+    }
+    finally {
+        pass("finally called");
+    };
+};
+
 1;