diff options
author | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-08-13 02:00:00 +0200 |
---|---|---|
committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-10-15 02:00:00 +0200 |
commit | 47e265af75141f6ffb557cf6c41a02a05ec82ccb (patch) | |
tree | aae7f3a3d1098d13b173b519bb00e73c01d5feab | |
parent | ced8b56090bdb4a7223ef6246acbe15568ffdb2d (diff) |
linux-modules: Fix module dependency loading.
* gnu/build/linux-modules.scm (dot-ko): Make COMPRESSION optional,
as expected by callers RECURSIVE-MODULE-DEPENDENCIES and
LOAD-LINUX-MODULE*.
-rw-r--r-- | gnu/build/linux-modules.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/build/linux-modules.scm b/gnu/build/linux-modules.scm index 3b1f512663..12cb9c4ba6 100644 --- a/gnu/build/linux-modules.scm +++ b/gnu/build/linux-modules.scm @@ -2,6 +2,7 @@ ;;; Copyright © 2014, 2016, 2018, 2019, 2022 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2018 Danny Milosavljevic <dannym@scratchpost.org> +;;; Copyright © 2023 Tobias Geerinckx-Rice <me@tobias.gr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -208,7 +209,7 @@ modules that can be postloaded, of the soft dependencies of module FILE." (string-take filename extension) filename))) -(define (dot-ko name compression) +(define* (dot-ko name #:optional compression) (let ((suffix (match compression ('xz ".ko.xz") ('gzip ".ko.gz") |