me
/
guix
Archived
1
0
Fork 0

gnu: python-fitsio: Use G-Expressions.

* gnu/packages/astronomy.scm (python-fitsio): Use G-Expressions.

Signed-off-by: Vinicius Monego <monego@posteo.net>
master
Sharlatan Hellseher 2023-05-24 22:51:44 +01:00 committed by Vinicius Monego
parent ee9dfc1dda
commit 2e501ccc03
No known key found for this signature in database
GPG Key ID: 637B0B138065B68A
1 changed files with 20 additions and 19 deletions

View File

@ -476,17 +476,18 @@ in FITS files.")
(modules '((guix build utils))) (modules '((guix build utils)))
(snippet (snippet
;; Remove the bundled cfitsio ;; Remove the bundled cfitsio
`(begin #~(begin
(delete-file-recursively "cfitsio3490") (delete-file-recursively "cfitsio3490")
(substitute* "MANIFEST.in" (substitute* "MANIFEST.in"
(("recursive-include cfitsio3490.*$\n") "")))))) (("recursive-include cfitsio3490.*$\n") ""))))))
(build-system python-build-system) (build-system python-build-system)
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'unbundle-cfitsio (add-after 'unpack 'unbundle-cfitsio
(lambda* (#:key inputs #:allow-other-keys) (lambda _
(let* ((cfitsio (assoc-ref inputs "cfitsio")) (let* ((cfitsio #$(this-package-input "cfitsio"))
(includedir (string-append "\"" cfitsio "/include\"")) (includedir (string-append "\"" cfitsio "/include\""))
(libdir (string-append "\"" cfitsio "/lib\""))) (libdir (string-append "\"" cfitsio "/lib\"")))
;; Use Guix' cfitsio instead of the bundled one ;; Use Guix' cfitsio instead of the bundled one