From: Richard Hartmann Date: Sat, 22 Nov 2014 08:25:36 +0000 (+0100) Subject: mr: Make check() even more pedantic X-Git-Url: https://git.madduck.net/code/myrepos.git/commitdiff_plain/refs/heads/deploy?ds=sidebyside mr: Make check() even more pedantic --- diff --git a/mr b/mr index f60ce7b..300f088 100755 --- a/mr +++ b/mr @@ -1880,7 +1880,7 @@ sub getopts { } sub check { - my @env = qw(GIT_DIR GIT_WORK_TREE VCSH_COMMAND); + my @env = qw(GIT_DIR GIT_INDEX_FILE GIT_OBJECT_DIRECTORY GIT_WORK_TREE VCSH_COMMAND VCSH_DIRECTORY VCSH_REPO_NAME); foreach (@env) { die ("mr: environment variable '$_' is set. You are about to shoot your own foot.\n") if ($ENV{$_}); }