X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~webstump/git?p=modbot-mtm.git;a=blobdiff_plain;f=install-substitutions;h=4f09cd3c06ed52ea06180cba2c6f8f8cbb652d71;hp=8df87c0e4f558a7cde3926984ae6b04a810b40c3;hb=690a5eae396438205bfd645f09c35cef34561ee4;hpb=dba7b54b3cc0c7f2a56ec6da37ac86bc80756b4a 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 $!; }