mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-05 19:11:43 -05:00
gnu: isc-dhcp: Fix cross-compilation.
* gnu/packages/admin.scm (isc-dhcp)[arguments]: Add a configure flag to specify randomdev path, which is needed when cross-compiling. Also add a fix-bind-cross-compilation phase.
This commit is contained in:
parent
8a0e29d8b9
commit
45e7599ce8
1 changed files with 8 additions and 0 deletions
|
@ -29,6 +29,7 @@
|
||||||
;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com>
|
||||||
;;; Copyright © 2019 Alex Griffin <a@ajgrf.com>
|
;;; Copyright © 2019 Alex Griffin <a@ajgrf.com>
|
||||||
;;; Copyright © 2019 Guillaume Le Vaillant <glv@posteo.net>
|
;;; Copyright © 2019 Guillaume Le Vaillant <glv@posteo.net>
|
||||||
|
;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
|
||||||
;;;
|
;;;
|
||||||
;;; This file is part of GNU Guix.
|
;;; This file is part of GNU Guix.
|
||||||
;;;
|
;;;
|
||||||
|
@ -776,6 +777,7 @@ (define-public isc-dhcp
|
||||||
(build-system gnu-build-system)
|
(build-system gnu-build-system)
|
||||||
(arguments
|
(arguments
|
||||||
`(#:parallel-build? #f
|
`(#:parallel-build? #f
|
||||||
|
#:configure-flags '("--with-randomdev=/dev/random")
|
||||||
#:phases
|
#:phases
|
||||||
(modify-phases %standard-phases
|
(modify-phases %standard-phases
|
||||||
(add-after 'unpack 'replace-bundled-bind
|
(add-after 'unpack 'replace-bundled-bind
|
||||||
|
@ -807,6 +809,12 @@ (define-public isc-dhcp
|
||||||
(("^RELEASEVER=.*")
|
(("^RELEASEVER=.*")
|
||||||
(format #f "RELEASEVER=~a\n" ,bind-release-version)))
|
(format #f "RELEASEVER=~a\n" ,bind-release-version)))
|
||||||
#t))
|
#t))
|
||||||
|
(add-before 'configure 'fix-bind-cross-compilation
|
||||||
|
(lambda _
|
||||||
|
(substitute* "configure"
|
||||||
|
(("--host=\\$host")
|
||||||
|
"--host=$host_alias"))
|
||||||
|
#t))
|
||||||
(add-after 'configure 'post-configure
|
(add-after 'configure 'post-configure
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
;; Point to the right client script, which will be
|
;; Point to the right client script, which will be
|
||||||
|
|
Loading…
Reference in a new issue