mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
system: hurd: Add net-base and inetutils, and /etc/{services,protocols}.
This fixes In procedure getaddrinfo: Servname not supported for ai_socktype * gnu/system/hurd.scm (%base-packages/hurd): Add net-base, inetutils. (cross-hurd-image): Add /etc/{services,protocols} from net-base.
This commit is contained in:
parent
c621269404
commit
db047a482c
1 changed files with 11 additions and 2 deletions
|
@ -21,6 +21,7 @@ (define-module (gnu system hurd)
|
|||
#:use-module (guix profiles)
|
||||
#:use-module (guix utils)
|
||||
#:use-module (gnu bootloader grub)
|
||||
#:use-module (gnu packages admin)
|
||||
#:use-module (gnu packages base)
|
||||
#:use-module (gnu packages bash)
|
||||
#:use-module (gnu packages cross-base)
|
||||
|
@ -48,7 +49,8 @@ (define-gexp-compiler (compile-manifest (manifest
|
|||
#:target target))
|
||||
|
||||
(define %base-packages/hurd
|
||||
(list hurd bash coreutils file findutils grep sed guile-3.0))
|
||||
(list hurd bash coreutils file findutils grep sed guile-3.0
|
||||
net-base inetutils))
|
||||
|
||||
(define* (cross-hurd-image #:key (hurd hurd) (gnumach gnumach))
|
||||
"Return a cross-built GNU/Hurd image."
|
||||
|
@ -158,7 +160,14 @@ (define hurd-directives
|
|||
(file "/etc/hostname" "guixygnu")
|
||||
(file "/etc/resolv.conf"
|
||||
"nameserver 10.0.2.3\n")
|
||||
|
||||
("/etc/services" -> ,(file-append (with-parameters ((%current-target-system
|
||||
"i586-pc-gnu"))
|
||||
net-base)
|
||||
"/etc/services"))
|
||||
("/etc/protocols" -> ,(file-append (with-parameters ((%current-target-system
|
||||
"i586-pc-gnu"))
|
||||
net-base)
|
||||
"/etc/protocols"))
|
||||
("/etc/motd" -> ,(file-append (with-parameters ((%current-target-system
|
||||
"i586-pc-gnu"))
|
||||
hurd)
|
||||
|
|
Loading…
Reference in a new issue