system: Add %base-packages-disk-utilities.

* gnu/system.scm (%base-packages-disk-utilities): New variable.
This commit is contained in:
Efraim Flashner 2020-10-09 12:47:34 +03:00
parent 993b3af640
commit e6e076281e
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351

View File

@ -10,6 +10,7 @@
;;; Copyright © 2020 Florian Pelz <pelzflorian@pelzflorian.de> ;;; Copyright © 2020 Florian Pelz <pelzflorian@pelzflorian.de>
;;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com> ;;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com>
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <jannek@gnu.org> ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <jannek@gnu.org>
;;; Copyright © 2020 Efraim Flashner <efraim@flashner.co.il>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -38,24 +39,27 @@
#:use-module ((guix utils) #:select (substitute-keyword-arguments)) #:use-module ((guix utils) #:select (substitute-keyword-arguments))
#:use-module (guix i18n) #:use-module (guix i18n)
#:use-module (guix diagnostics) #:use-module (guix diagnostics)
#:use-module (gnu packages admin)
#:use-module (gnu packages base) #:use-module (gnu packages base)
#:use-module (gnu packages bash) #:use-module (gnu packages bash)
#:use-module (gnu packages compression)
#:use-module (gnu packages cross-base) #:use-module (gnu packages cross-base)
#:use-module (gnu packages cryptsetup)
#:use-module (gnu packages disk)
#:use-module (gnu packages file-systems)
#:use-module (gnu packages firmware)
#:use-module (gnu packages gawk)
#:use-module (gnu packages guile) #:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz) #:use-module (gnu packages guile-xyz)
#:use-module (gnu packages admin)
#:use-module (gnu packages hurd) #:use-module (gnu packages hurd)
#:use-module (gnu packages linux)
#:use-module (gnu packages pciutils)
#:use-module (gnu packages package-management)
#:use-module (gnu packages less) #:use-module (gnu packages less)
#:use-module (gnu packages zile) #:use-module (gnu packages linux)
#:use-module (gnu packages nano)
#:use-module (gnu packages gawk)
#:use-module (gnu packages man) #:use-module (gnu packages man)
#:use-module (gnu packages nano)
#:use-module (gnu packages package-management)
#:use-module (gnu packages pciutils)
#:use-module (gnu packages texinfo) #:use-module (gnu packages texinfo)
#:use-module (gnu packages compression) #:use-module (gnu packages zile)
#:use-module (gnu packages firmware)
#:use-module (gnu services) #:use-module (gnu services)
#:use-module (gnu services shepherd) #:use-module (gnu services shepherd)
#:use-module (gnu services base) #:use-module (gnu services base)
@ -159,6 +163,7 @@
%base-packages-interactive %base-packages-interactive
%base-packages-linux %base-packages-linux
%base-packages-networking %base-packages-networking
%base-packages-disk-utilities
%base-packages-utils %base-packages-utils
%base-firmware %base-firmware
%default-kernel-arguments)) %default-kernel-arguments))
@ -728,6 +733,19 @@ of PROVENANCE-SERVICE-TYPE to its services."
;; many people are familiar with, so keep it around. ;; many people are familiar with, so keep it around.
iw wireless-tools)) iw wireless-tools))
(define %base-packages-disk-utilities
;; A well-rounded set of packages for interacting with disks, partitions
;; and filesystems.
(list parted gptfdisk ddrescue
;; We used to provide fdisk from GNU fdisk, but as of version 2.0.0a
;; it pulls Guile 1.8, which takes unreasonable space; furthermore
;; util-linux's fdisk is already available, in %base-packages-linux.
cryptsetup mdadm
dosfstools
btrfs-progs
f2fs-tools
jfsutils))
(define %base-packages (define %base-packages
;; Default set of packages globally visible. It should include anything ;; Default set of packages globally visible. It should include anything
;; required for basic administrator tasks. ;; required for basic administrator tasks.