summaryrefslogtreecommitdiffstats
path: root/lib/Reply/Plugin/Defaults.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Reply/Plugin/Defaults.pm')
-rw-r--r--lib/Reply/Plugin/Defaults.pm9
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/Reply/Plugin/Defaults.pm b/lib/Reply/Plugin/Defaults.pm
index b0c4e88..debed09 100644
--- a/lib/Reply/Plugin/Defaults.pm
+++ b/lib/Reply/Plugin/Defaults.pm
@@ -38,6 +38,15 @@ sub compile {
my $self = shift;
my ($next, $line, %args) = @_;
+ my @envs = (
+ ($args{environment} ? ($args{environment}) : ()),
+ values %{ $args{environments} },
+ );
+
+ if (@envs) {
+ $args{environment} = { map { %$_ } @envs }
+ }
+
return eval_closure(
source => "sub {\n$PREFIX;\n$line\n}",
terse_error => 1,