;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
;;; GNU Guix is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 3 of the License, or (at
;;; your option) any later version.
;;;
;;; GNU Guix is distributed in the hope that it will be useful, but
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;; GNU General Public License for more details.
;;;
;;; You should have received a copy of the GNU General Public License
;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.

;;; Commentary:
;;;
;;; This file defines a manifest with a selection of packages for Cuirass to
;;; build for GNU/Hurd.
;;;
;;; Code:

(use-modules (gnu)
             (gnu system hurd)
             (guix packages)
             (guix utils)
             (ice-9 match)
             (srfi srfi-1))

(use-package-modules
 base commencement compression file gawk gdb gettext guile
 hurd less m4 package-management python ssh version-control)

(define (input->package input)
  "Return the INPUT as package, or #f."
  (match input
    ((label (and (? package?) package))
     package)
    ((label (and (? package?) package . output))
     (cons package output))
    (_ #f)))

(define guix-dependencies
  (filter-map input->package
              (fold alist-delete (package-direct-inputs guix)
                    '("glibc-utf8-locales" "graphviz" "po4a"))))

(define (package-without-tests p)
  (package/inherit p
    (arguments
     (substitute-keyword-arguments (package-arguments p)
       ((#:tests? _ #f) #f)))))

(packages->manifest
 (cons*
  ;; where it all starts
  hello

  ;; development utililities
  diffutils file findutils gawk grep gzip less m4 openssh-sans-x tar xz

  ;; development packages
  gcc-toolchain gdb-minimal git-minimal gnu-make

  ;; guix environment guix --without-tests=python-minimal --without-tests=gettext-minimal
  (package-without-tests gettext-minimal)
  (package-without-tests python-minimal)

  (append
   guix-dependencies
   (delete guile-3.0 %base-packages/hurd))))
og/gnu/services/linux.scm?id=734f50c31dddc75dca13e2c81abf0ad5b5433e29'>linux.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/services/linux.scm?id=734f50c31dddc75dca13e2c81abf0ad5b5433e29&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2022-06-11 00:57:13 -0400'>2022-06-11</span></td><td><a href='/guix/commit/gnu/services/linux.scm?id=a99015c8783eb5281618173779a0550b15a79617'>system: Align zram priority with swap-space spec to clarify.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;https://issues.guix.gnu.org/54783&gt;.

* gnu/services/linux.scm (zram-device-configuration)
[priority]: Adapt to use #f or an integer from 0 to 32767.  Add sanitizer to
warn for the change and delay the field.
(zram-device-configuration-&gt;udev-string): Adapt as above.
* doc/guix.texi (Zram Device Service): Remove double copyright line.
Change priority description to refer to the Swap Space one, and suggest not
leaving the default #f on to properly use zram.

Reported-by: Stefan Baums &lt;baums@stefanbaums.com&gt;
Modified-by: Maxim Cournoyer &lt;maxim.cournoyer@gmail.com&gt;
Signed-off-by: Maxim Cournoyer &lt;maxim.cournoyer@gmail.com&gt;
</span></span></td><td>Josselin Poiret</td></tr>
<tr><td><span title='2021-04-24 12:30:01 -0400'>2021-04-24</span></td><td><a href='/guix/commit/gnu/services/linux.scm?id=2c93df3d11bf8ceeb5c203416a2533cf32275e1a'>services: Add a service for rasdaemon.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/linux.scm (rasdaemon-configuration, rasdaemon-configuration?,
rasdaemon-configuration-record?, rasdaemon-service-type): New variables.
* doc/guix.texi (Linux Services): Document it.

Signed-off-by: Leo Famulari &lt;leo@famulari.name&gt;
</span></span></td><td>B. Wilson</td></tr>
<tr><td><span title='2021-02-08 03:34:40 +0100'>2021-02-08</span></td><td><a href='/guix/commit/gnu/services/linux.scm?id=fe7529d71b8d7b09b48679c86e1155895afd92a4'>gnu: Remove 'file-systems requirement from kernel-module-loader.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/linux.scm (kernel-module-loader-shepherd-service):
Remove 'file-systems requirement.

Signed-off-by: Danny Milosavljevic &lt;dannym@scratchpost.org&gt;
</span></span></td><td>raid5atemyhomework</td></tr>
<tr><td><span title='2021-01-06 19:18:58 +0100'>2021-01-06</span></td><td><a href='/guix/commit/gnu/services/linux.scm?id=3d3185b54448cb44fffc1badc8c1cf51bb76585d'>services: kernel-module-loader: Return a single 'shepherd-service'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/linux.scm (kernel-module-loader-shepherd-service): Return
a 'shepherd-service' instead of a list of it.
(kernel-module-loader-service-type): Adjust it.

Signed-off-by: Danny Milosavljevic &lt;dannym@scratchpost.org&gt;
</span></span></td><td>Brice Waegeneire</td></tr>