tests: skip perl tests if NO_PERL is defined

diff --git a/http-push.c b/http-push.c
index 7dc0dd4ec7e32d7f962fae5fa5d03228c03c8185..feeb340daf4a2711050cbc035e5609e0b66fa648 100644 (file)
--- a/http-push.c
+++ b/http-push.c
@@ -752,7 +752,6 @@ static void finish_request(struct transfer_request *request)
                        aborted = 1;
                }
        } else if (request->state == RUN_FETCH_LOOSE) {
-               fchmod(request->local_fileno, 0444);
                close(request->local_fileno); request->local_fileno = -1;
 
                if (request->curl_result != CURLE_OK &&