From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Mon, 6 Oct 2014 14:10:06 +0000 (+0100)
Subject: install-substitutions: insist on webstump 022
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~webstump/git?p=modbot-mtm.git;a=commitdiff_plain;h=4b0444617af5c976bd16d4be765799aeb4c7e9e2

install-substitutions: insist on webstump 022
---

diff --git a/install-substitutions b/install-substitutions
index 9bcee54..74e9043 100755
--- a/install-substitutions
+++ b/install-substitutions
@@ -13,6 +13,14 @@ if [ $# != 0 ]; then echo >&2 "usage: ./${0##*/} [-n]"; exit 1; fi
 
 . ./get-settings
 
+if [ x"`whoami`" != x"$OURUSER" ]; then
+	echo >&2 "$0 must be run as $OURUSER, skipping"
+	exit 0
+fi
+
+# procmail insists on g-w
+umask 022
+
 find -name '*.IN[O1]' ! -path '*/skeleton/*' -exec perl -e '
 	use IO::Handle;
 	use POSIX;