;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2020 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
'("bootstrap-tarballs" "gcc-toolchain" "nss-certs"
"openssh" "emacs" "vim" "python" "guile" "guix")))
+(define %base-packages/hurd
+ ;; XXX: For now we are less demanding of "i586-gnu".
+ (map specification->package
+ '("coreutils" "grep" "findutils" "gawk" "make"
+ "gcc-toolchain" "tar" "xz")))
+
(define %system-packages
;; Key packages proposed by the Guix System installer.
(append (map specification->package
'("xorg-server" "xfce" "gnome" "mate" "enlightenment"
"openbox" "awesome" "i3-wm" "ratpoison"
+ "emacs" "emacs-exwm" "emacs-desktop-environment"
"xlockmore" "slock" "libreoffice"
"connman" "network-manager" "network-manager-applet"
"openssh" "ntp" "tor"
(manifest
(append-map (lambda (system)
(map (cut package->manifest-entry* <> system)
- %base-packages))
- %hydra-supported-systems)))
+ (if (string=? system "i586-gnu")
+ %base-packages/hurd
+ %base-packages)))
+ %cuirass-supported-systems)))
(define %system-manifest
(manifest