tribes/guix
1
0
Fork 1
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-06-17 07:24:07 +02:00
Code Activity

system: virtualized-operating-system: Fix version comparison.

Browse Source 
(string< "6.6" "6.14") => #f

* gnu/system/vm.scm (virtualized-operating-system): Use version>=? instead of
string< to compare version.

Merges: #7959
This commit is contained in:
Hilton Chain
2026-04-17 16:47:08 +08:00
parent 412c748ff5
commit fa39bf58a7
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
gnu/system/vm.scm
+3 -3
View File
@@ -189,9 +189,9 @@ environment with the store shared with the host. MAPPINGS is a list of
(kernel-version
(package-version (operating-system-kernel os)))
(cirrus-module
(if (string< kernel-version "6.14")
"cirrus"
"cirrus-qemu")))
(if (version>=? kernel-version "6.14")
"cirrus-qemu"
"cirrus")))
(if (member cirrus-module modules)
modules
(cons cirrus-module modules))))