refex-expr: die when admin forgets to add the required line to the rc
This commit is contained in:
parent
16f2d9b879
commit
57760d7e1b
|
@ -3,6 +3,8 @@ use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
my $rule = $ARGV[7];
|
my $rule = $ARGV[7];
|
||||||
|
die "\n\nFATAL: GL_REFEX_EXPR_ doesn't exist\n(your admin probably forgot the rc file change needed for this to work)\n\n"
|
||||||
|
unless exists $ENV{"GL_REFEX_EXPR_" . $rule};
|
||||||
my $res = $ENV{"GL_REFEX_EXPR_" . $rule} || 0;
|
my $res = $ENV{"GL_REFEX_EXPR_" . $rule} || 0;
|
||||||
print "$ARGV[6] ($res)\n" if $res;
|
print "$ARGV[6] ($res)\n" if $res;
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue