Don't interpolate (closes: #976)

2016-03-10 20:27:43 +00:00 · 2016-03-10 20:27:43 +00:00 · 6a263b4296
commit 6a263b4296
parent 1480fcfd75
1 changed files with 1 additions and 0 deletions
--- a/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Reload.pm
+++ b/lemonldap-ng-handler/lib/Lemonldap/NG/Handler/Reload.pm
@ -457,6 +457,7 @@ sub substitute {

    # substitute vars with session datas, excepts special vars $_ and $\d+
    $expr =~ s/\$(_*[a-zA-Z]\w*)/\$datas->{$1}/sg;
+    $expr =~ s/\$datas->{ENV}/\$ENV/sg;

    return $expr;
 }