me
/
guix
Archived
1
0
Fork 0
Code

gnu: f3: Fix cross-compiling. 

* gnu/packages/disk.scm (f3)
[arguments]: Use Gexp.

Change-Id: I906a2b7b7691ae53592cfa35ba64fc7e7d735664
Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
master
Zheng Junjie 2023-12-28 23:58:59 +08:00 committed by Mathieu Othacehe
parent c5c28df899
commit 2c371d2cd9
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 13 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
gnu/packages/disk.scm
View File

@ -27,6 +27,7 @@
;;; Copyright © 2022 Disseminate Dissent <disseminatedissent@protonmail.com> ;;; Copyright © 2022 Disseminate Dissent <disseminatedissent@protonmail.com>
;;; Copyright © 2023 Timotej Lazar <timotej.lazar@araneo.si> ;;; Copyright © 2023 Timotej Lazar <timotej.lazar@araneo.si>
;;; Copyright © 2023 Morgan Smith <Morgan.J.Smith@outlook.com> ;;; Copyright © 2023 Morgan Smith <Morgan.J.Smith@outlook.com>
;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -843,18 +844,18 @@ systems. Output format is completely customizable.")
(base32 "17l5vspfcgfbkqg7bakp3gql29yb05gzawm8n3im30ilzdr53678")))) (base32 "17l5vspfcgfbkqg7bakp3gql29yb05gzawm8n3im30ilzdr53678"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; no check target (list #:tests? #f ; no check target
#:make-flags (list (string-append "CC=" ,(cc-for-target)) #:make-flags #~(list (string-append "CC=" #$(cc-for-target))
(string-append "PREFIX=" %output)) (string-append "PREFIX=" #$output))
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(delete 'configure) ; no configure script (delete 'configure) ; no configure script
(add-after 'build 'build-extra (add-after 'build 'build-extra
(lambda* (#:key make-flags #:allow-other-keys) (lambda* (#:key make-flags #:allow-other-keys)
(apply invoke "make" "extra" make-flags))) (apply invoke "make" "extra" make-flags)))
(add-after 'build 'install-extra (add-after 'build 'install-extra
(lambda* (#:key make-flags #:allow-other-keys) (lambda* (#:key make-flags #:allow-other-keys)
(apply invoke "make" "install-extra" make-flags)))))) (apply invoke "make" "install-extra" make-flags))))))
(inputs (inputs
(list eudev parted)) (list eudev parted))
(home-page "http://oss.digirati.com.br/f3/") (home-page "http://oss.digirati.com.br/f3/")