From: Yuval Kogman <nothingmuch@woobling.org>
Date: Tue, 3 Nov 2009 13:03:39 +0000 (+0200)
Subject: Set $Carp::Internal{"Try::Tiny"}
X-Git-Tag: Try-Tiny-0.03~5
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6f114080b8c5a0536a0a7c9025d665b918cf03b7;p=p5sagit%2FTry-Tiny.git

Set $Carp::Internal{"Try::Tiny"}
---

diff --git a/lib/Try/Tiny.pm b/lib/Try/Tiny.pm
index 7c0256d..d8d006a 100644
--- a/lib/Try/Tiny.pm
+++ b/lib/Try/Tiny.pm
@@ -16,6 +16,8 @@ $VERSION = eval $VERSION;
 
 @EXPORT = @EXPORT_OK = qw(try catch);
 
+$Carp::Internal{+__PACKAGE__}++;
+
 sub try (&;$) {
 	my ( $try, $catch ) = @_;