Merge branch 'jk/rebuild-perl-scripts-with-no-perl-seting-change'

diff --git a/git-sh-setup.sh b/git-sh-setup.sh
index 9447980330ce7892757f9b11fa45cfeb3e6fcb34..d968760139b0e7b9219a1602a2e646a3ed398136 100644 (file)
--- a/git-sh-setup.sh
+++ b/git-sh-setup.sh
@@ -330,8 +330,7 @@ esac
 
 # Make sure we are in a valid repository of a vintage we understand,
 # if we require to be in a git repository.
-if test -z "$NONGIT_OK"
-then
+git_dir_init () {
        GIT_DIR=$(git rev-parse --git-dir) || exit
        if [ -z "$SUBDIRECTORY_OK" ]
        then
@@ -346,6 +345,11 @@ then
                exit 1
        }
        : ${GIT_OBJECT_DIRECTORY="$GIT_DIR/objects"}
+}
+
+if test -z "$NONGIT_OK"
+then
+       git_dir_init
 fi
 
 peel_committish () {