From fa39bf58a76fd27bbb0bb0a010c4cd61abf80027 Mon Sep 17 00:00:00 2001 From: Hilton Chain Date: Fri, 17 Apr 2026 16:47:08 +0800 Subject: [PATCH] system: virtualized-operating-system: Fix version comparison. (string< "6.6" "6.14") => #f * gnu/system/vm.scm (virtualized-operating-system): Use version>=? instead of string< to compare version. Merges: #7959 --- gnu/system/vm.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm index 626b5039acc..a6a05862a5c 100644 --- a/gnu/system/vm.scm +++ b/gnu/system/vm.scm @@ -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))))