Commit 53f1ba28 authored by Xavier Guimard's avatar Xavier Guimard

Typo (#1151)

parent 6ce490c5
......@@ -199,7 +199,7 @@ sub findB {
sub buildSub {
my ( $self, $cond ) = @_;
my $safe = Safe->new;
my $res = $safe->reval("sub{my(\$env)=@\_;return ($cond)}");
my $res = $safe->reval("sub{my(\$env)=\@_;return ($cond)}");
die "Bad condition $cond: $@" if ($@);
return $res;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment