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