X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~webstump/git?a=blobdiff_plain;f=install-substitutions;h=4f09cd3c06ed52ea06180cba2c6f8f8cbb652d71;hb=ce2774536f74c9511d68c2de600dc042093a83fd;hp=8df87c0e4f558a7cde3926984ae6b04a810b40c3;hpb=dba7b54b3cc0c7f2a56ec6da37ac86bc80756b4a;p=modbot-ulm.git diff --git a/install-substitutions b/install-substitutions index 8df87c0..4f09cd3 100755 --- a/install-substitutions +++ b/install-substitutions @@ -17,7 +17,7 @@ find -name '*.IN[O1]' ! -path '*/skeleton/*' -exec perl -e ' my $mode= (stat F)[2]; while () { s/\%(\w+)\%/ - exists($ENV{$1}) ? $ENV{$1} : die "$1 ?" + exists($ENV{$1}) ? $ENV{$1} : die "$1 undef at $f:$.\n" /ge; print G or die $!; }