mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
import/cran: Remove directory-needs-zlib? in favor of needed-libraries-in-directory.
* guix/import/cran.scm (directory-needs-zlib?): Remove procedure. (source-dir->dependencies): Use needed-libraries-in-directory instead of directory-needs-zlib?.
This commit is contained in:
parent
049cff91ac
commit
8525c26499
1 changed files with 1 additions and 6 deletions
|
@ -471,11 +471,6 @@ (define (files-match-pattern? directory regexp . file-patterns)
|
|||
(else (loop))))))))
|
||||
(apply find-files directory file-patterns))))
|
||||
|
||||
(define (directory-needs-zlib? dir)
|
||||
"Return #T if any of the Makevars files in the src directory DIR contain a
|
||||
zlib linker flag."
|
||||
(files-match-pattern? dir "-lz" "(Makevars.*|configure.*)"))
|
||||
|
||||
(define packages-for-matches
|
||||
'(("-lcrypto" . "openssl")
|
||||
("-lcurl" . "curl")
|
||||
|
@ -530,7 +525,7 @@ (define (source-dir->dependencies dir)
|
|||
"Guess dependencies of R package source in DIR and return two values: a list
|
||||
of package names for INPUTS and another list of names of NATIVE-INPUTS."
|
||||
(values
|
||||
(if (directory-needs-zlib? dir) '("zlib") '())
|
||||
(needed-libraries-in-directory dir)
|
||||
(append
|
||||
(if (directory-needs-esbuild? dir) '("esbuild") '())
|
||||
(if (directory-needs-pkg-config? dir) '("pkg-config") '())
|
||||
|
|
Loading…
Reference in a new issue