From 2c7ff8fc16795c25234a8cb9847712d581396562 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Wed, 26 Jun 2013 14:04:29 -0400 Subject: set the current package properly when moving around in frames --- lib/Carp/Reply.pm | 2 +- lib/Reply/Plugin/CarpReply.pm | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/Carp/Reply.pm b/lib/Carp/Reply.pm index cc1316d..ea6ecfc 100644 --- a/lib/Carp/Reply.pm +++ b/lib/Carp/Reply.pm @@ -3,7 +3,7 @@ use strict; use warnings; # ABSTRACT: get a repl on exceptions in your program -use Reply; +use Reply 0.13; use Reply::Config; =head1 SYNOPSIS diff --git a/lib/Reply/Plugin/CarpReply.pm b/lib/Reply/Plugin/CarpReply.pm index 3bc2719..7206348 100644 --- a/lib/Reply/Plugin/CarpReply.pm +++ b/lib/Reply/Plugin/CarpReply.pm @@ -40,6 +40,7 @@ sub compile { my ($next, $line, %opts) = @_; $opts{environment} = $self->_frame->lexicals; + $opts{package} = $self->_frame->package; return $next->($line, %opts); } -- cgit v1.2.3