summaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2013-08-01 15:12:45 -0400
committerJesse Luehrs <doy@tozt.net>2013-08-01 15:12:45 -0400
commit48cc772251f743537652dea6083c6d6c293a508a (patch)
treedc106d82d3ddde52647c816c0d5987a515851546 /lib
parenta053a1c2c58bddf2c2fec665715341a24913ce61 (diff)
downloadreply-48cc772251f743537652dea6083c6d6c293a508a.tar.gz
reply-48cc772251f743537652dea6083c6d6c293a508a.zip
new Eval::Closure supports this itself
Diffstat (limited to 'lib')
-rw-r--r--lib/Reply/Plugin/Defaults.pm8
1 files changed, 2 insertions, 6 deletions
diff --git a/lib/Reply/Plugin/Defaults.pm b/lib/Reply/Plugin/Defaults.pm
index 797fcbb..d2acfbc 100644
--- a/lib/Reply/Plugin/Defaults.pm
+++ b/lib/Reply/Plugin/Defaults.pm
@@ -13,8 +13,7 @@ use warnings;
use base 'Reply::Plugin';
-use Devel::LexAlias 'lexalias';
-use Eval::Closure 0.09;
+use Eval::Closure 0.11;
sub new {
my $class = shift;
@@ -55,14 +54,11 @@ sub compile {
my $code = eval_closure(
source => "sub {\n$prefix;\n$line\n}",
terse_error => 1,
+ alias => 1,
environment => $env,
%args,
);
- for my $name (keys %$env) {
- lexalias($code, $name, $env->{$name});
- }
-
return $code;
}