mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 05:48:07 -05:00
gnu: r-rmarkdown: Ensure temporary files can be deleted.
* gnu/packages/statistics.scm (r-rmarkdown)[arguments]: Add phase "copy-files-without-mode".
This commit is contained in:
parent
3f1c722ec7
commit
b78891b012
1 changed files with 14 additions and 0 deletions
|
@ -1953,6 +1953,20 @@ (define-public r-rmarkdown
|
|||
"0c7gs9c8xdjfxviw0syh13pf3vys2b2ssixmnyqbji64xdscn7pz"))))
|
||||
(properties `((upstream-name . "rmarkdown")))
|
||||
(build-system r-build-system)
|
||||
(arguments
|
||||
`(#:phases
|
||||
(modify-phases %standard-phases
|
||||
;; See https://github.com/rstudio/rmarkdown/pull/800
|
||||
;; The resource files are in the store and have mode 444. After
|
||||
;; copying the files R fails to remove them again because it doesn't
|
||||
;; have write access to them.
|
||||
(add-after 'unpack 'copy-files-without-mode
|
||||
(lambda _
|
||||
(substitute* "R/render.R"
|
||||
(("file.copy\\(from = from," prefix)
|
||||
(string-append prefix
|
||||
" copy.mode = FALSE, ")))
|
||||
#t)))))
|
||||
(propagated-inputs
|
||||
`(("r-catools" ,r-catools)
|
||||
("r-htmltools" ,r-htmltools)
|
||||
|
|
Loading…
Reference in a new issue