From: Heiko Schlittermann (HS12-RIPE) <hs@schlittermann.de>
Date: Sun, 6 Nov 2016 23:04:32 +0000 (+0100)
Subject: Set umask only if not 022 already, print a notice about doing thata
X-Git-Url: https://git.exim.org/buildfarm-client.git/commitdiff_plain/8ed615f58dcd140b08e4dcaa466b88c4e30d784d?hp=550e2278baf9870d8d73666c49f3fe76fd4a47b4

Set umask only if not 022 already, print a notice about doing thata
---

diff --git a/run_build b/run_build
index ef80039..b1c063f 100755
--- a/run_build
+++ b/run_build
@@ -36,6 +36,7 @@ our $VERSION = 'REL_0.1';
 
 use strict;
 use warnings;
+use 5.010;
 use Config;
 use Fcntl qw(:flock :seek);
 use File::Path;
@@ -83,15 +84,15 @@ if ($0 =~ /(.*)\.pl$/) {
     exec $1, @ARGV;
 }
 
-die "$0: please use an umask of 022\n"
-    if umask > 022;
+if (umask != 022) {
+    umask 022;
+    say "$0: forced umask to 022" if -t;
+}
 
 my %module_hooks;
 my $orig_dir = getcwd();
 push @INC, $orig_dir;
 
-umask 022;
-
 # make sure we exit nicely on any normal interrupt
 # so the cleanup handler gets called.
 # that lets us stop the db if it's running and