diff --git a/racket/collects/net/git-checkout.rkt b/racket/collects/net/git-checkout.rkt
index 1e1c8a29d8..34ac181816 100644
--- a/racket/collects/net/git-checkout.rkt
+++ b/racket/collects/net/git-checkout.rkt
@@ -955,9 +955,8 @@
     (copy-file (build-path (tmp-info-dir tmp) location)
                dest-file
                #t)])
-  (if (eq? 'windows (system-type 'os))
-      (file-or-directory-permissions dest-file #o755)
-      (file-or-directory-permissions dest-file perms)))
+  (unless (equal? 'windows (system-type 'os))
+    (file-or-directory-permissions dest-file perms)))
 
 ;; object->bytes : tmp-info location -> bytes
 (define (object->bytes tmp location)