summary refs log tree commit diff
path: root/gnu/tests
diff options
context:
space:
mode:
authorDanny Milosavljevic <dannym@scratchpost.org>2020-04-22 22:58:11 +0200
committerDanny Milosavljevic <dannym@scratchpost.org>2020-04-22 22:59:39 +0200
commitf91ad0b13d8d3d5b1ae92e209b1be6e8473385ba (patch)
tree63a580834adc1bb782fa948b8b2ca6c34d53a788 /gnu/tests
parent2213d00faca72029dc54b559dd6124059c6c0881 (diff)
downloadguix-f91ad0b13d8d3d5b1ae92e209b1be6e8473385ba.tar.gz
system: Automatically adjust linux-module packages to use the
operating-system's kernel.

* gnu/system.scm (package-for-kernel): New procedure.
(operating-system-directory-base-entries): Use it.
* gnu/tests/linux-module.scm: Test it.
Diffstat (limited to 'gnu/tests')
-rw-r--r--gnu/tests/linux-modules.scm11
1 files changed, 10 insertions, 1 deletions
diff --git a/gnu/tests/linux-modules.scm b/gnu/tests/linux-modules.scm
index 788bdc848a..953b132ef7 100644
--- a/gnu/tests/linux-modules.scm
+++ b/gnu/tests/linux-modules.scm
@@ -28,8 +28,10 @@
   #:use-module (guix derivations)
   #:use-module (guix gexp)
   #:use-module (guix modules)
+  #:use-module (guix packages)
   #:use-module (guix monads)
   #:use-module (guix store)
+  #:use-module (guix utils)
   #:export (%test-loadable-kernel-modules-0
             %test-loadable-kernel-modules-1
             %test-loadable-kernel-modules-2))
@@ -118,5 +120,12 @@ with one extra module.")
    (description "Tests loadable kernel modules facility of <operating-system>
 with two extra modules.")
    (value (run-loadable-kernel-modules-test
-           (list acpi-call-linux-module ddcci-driver-linux)
+           (list acpi-call-linux-module
+                 (package
+                   (inherit ddcci-driver-linux)
+                   (arguments
+                    `(#:linux #f
+                      ,@(strip-keyword-arguments '(#:linux)
+                                                 (package-arguments
+                                                  ddcci-driver-linux))))))
            '("acpi_call" "ddcci")))))