t4209: factor out helper function test_log()

diff --git a/t/t4014-format-patch.sh b/t/t4014-format-patch.sh
index 8f272bce84ba605da82dacb04561649f10878df0..73194b2c3dbe267b759bfd036367366b4955f0c4 100755 (executable)
--- a/t/t4014-format-patch.sh
+++ b/t/t4014-format-patch.sh
@@ -293,7 +293,7 @@ check_threading () {
        (git format-patch --stdout "$@"; echo $? > status.out) |
        # Prints everything between the Message-ID and In-Reply-To,
        # and replaces all Message-ID-lookalikes by a sequence number
-       "$PERL_PATH" -ne '
+       perl -ne '
                if (/^(message-id|references|in-reply-to)/i) {
                        $printing = 1;
                } elsif (/^\S/) {