system: hurd: Add guile-candy.

* gnu/system/hurd.scm (%base-packages/hurd): Add GUILE-COLORIZED and
GUILE-READLINE.
(cross-hurd-image)[hurd-directives]: Add /root/.guile.
This commit is contained in:
Ludovic Courtès 2020-04-08 23:10:14 +02:00
parent db047a482c
commit 5084fd3854
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -27,6 +27,7 @@ (define-module (gnu system hurd)
#:use-module (gnu packages cross-base)
#:use-module (gnu packages file)
#:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz)
#:use-module (gnu packages hurd)
#:use-module (gnu system vm)
#:export (cross-hurd-image))
@ -49,7 +50,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 guile-colorized guile-readline
net-base inetutils))
(define* (cross-hurd-image #:key (hurd hurd) (gnumach gnumach))
@ -150,6 +152,11 @@ (define hurd-directives
;; TODO: Create those during activation, eventually.
(directory "/root")
(file "/root/.guile"
,(object->string
'(begin
(use-modules (ice-9 readline) (ice-9 colorized))
(activate-readline) (activate-colorized))))
(directory "/run")
(directory "/run/current-system")
("/run/current-system/profile" -> ,system-profile)