me/guix
Archived
1
0
Fork 0
Code Activity

gnu: r-with-tests: Update to 4.2.0.

Browse source 
* gnu/packages/statistics.scm (r-with-tests): Update to 4.2.0.
[arguments]: Add phase 'patch-tests; add phase 'set-home.
This commit is contained in:
Ricardo Wurmus 2022-05-25 07:33:02 +02:00
parent 0542905a2c
commit 43e82253c1
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 15 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
gnu/packages/statistics.scm
View file

@ -203,7 +203,7 @@ This package also provides @command{xls2csv} to export Excel files to CSV.")
(define r-with-tests (define r-with-tests
(package (package
(name "r-with-tests") (name "r-with-tests")
(version "4.1.3") (version "4.2.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "mirror://cran/src/base/R-" (uri (string-append "mirror://cran/src/base/R-"
@ -211,7 +211,7 @@ This package also provides @command{xls2csv} to export Excel files to CSV.")
version ".tar.gz")) version ".tar.gz"))
(sha256 (sha256
(base32 (base32
"1mpy4sar1amx5ai9rqr9s0nw8p65iqfrqbm5n9h402b17hrmpzqm")))) "123l17sv3smh5cz0vrjxjj8jf81bb860kah6iww9bl3skdqvgsiq"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:disallowed-references (,tzdata-for-tests) `(#:disallowed-references (,tzdata-for-tests)
@ -237,6 +237,16 @@ This package also provides @command{xls2csv} to export Excel files to CSV.")
(("uname") uname-bin)) (("uname") uname-bin))
(substitute* "src/unix/sys-std.c" (substitute* "src/unix/sys-std.c"
(("rm -Rf ") (string-append rm-bin " -Rf ")))))) (("rm -Rf ") (string-append rm-bin " -Rf "))))))
(add-after 'unpack 'patch-tests
(lambda _
;; This is needed because R is run during the check phase and
;; /bin/sh doesn't exist in the build container.
(substitute* "src/unix/sys-unix.c"
(("\"/bin/sh\"")
(string-append "\"" (which "sh") "\"")))
;; This test fails because line numbers are off by two.
(substitute* "tests/reg-packages.R"
(("8 <= print" m) (string-append "## " m)))))
(add-after 'unpack 'build-reproducibly (add-after 'unpack 'build-reproducibly
(lambda _ (lambda _
;; The documentation contains time stamps to demonstrate ;; The documentation contains time stamps to demonstrate
@ -315,6 +325,9 @@ as.POSIXct(if (\"\" != Sys.getenv(\"SOURCE_DATE_EPOCH\")) {\
(setenv "TZDIR" (setenv "TZDIR"
(search-input-directory inputs (search-input-directory inputs
"share/zoneinfo")))) "share/zoneinfo"))))
(add-before 'check 'set-home
;; Some tests require that HOME be set.
(lambda _ (setenv "HOME" "/tmp")))
(add-after 'build 'make-info (add-after 'build 'make-info
(lambda _ (invoke "make" "info"))) (lambda _ (invoke "make" "info")))
(add-after 'build 'install-info (add-after 'build 'install-info