don't set permissions on windows, for now
(at some point hopefully we'll figure out what's the right behavior here) This is related to pull request #1060
This commit is contained in:
parent
35a0f0c71c
commit
45b635f707
|
@ -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)
|
||||
|
|
Loading…
Reference in New Issue
Block a user