build/gnu: Ensure the files are writable after the unpack phase.

Fixes <https://issues.guix.gnu.org/43015>.

* guix/build/gnu-build-system.scm (unpack): Call 'make-file-writable' on every
source file.
This commit is contained in:
Maxim Cournoyer 2021-02-04 00:14:32 -05:00
parent 337a94e534
commit 6129ebddbd
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -170,7 +170,8 @@ (define* (unpack #:key source #:allow-other-keys)
(when command (when command
(invoke command "--decompress" name))))) (invoke command "--decompress" name)))))
;; Attempt to change into child directory. ;; Attempt to change into child directory.
(and=> (first-subdirectory ".") chdir)))) (and=> (first-subdirectory ".") chdir)))
(for-each make-file-writable (find-files ".")))
(define* (bootstrap #:key bootstrap-scripts (define* (bootstrap #:key bootstrap-scripts
#:allow-other-keys) #:allow-other-keys)