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 ;;; Copyright © 2017 Mathieu Othacehe ;;; Copyright © 2018 Danny Milosavljevic +;;; Copyright © 2023 Tobias Geerinckx-Rice ;;; ;;; This file is part of GNU Guix. ;;; @@ -208,7 +209,7 @@ (define (strip-extension filename) (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")