From e178de931859399abdd4bd3300b7ce7c5593a6e3 Mon Sep 17 00:00:00 2001 Message-ID: From: Zheng Junjie Date: Tue, 2 Apr 2024 00:59:54 +0800 Subject: [PATCH] vm: Don't add -enable-kvm when SYSTEM and %system are not same. * gnu/system/vm.scm (common-qemu-options): Don't add -enable-kvm when SYSTEM and %system are not same. Change-Id: Ie6c602b297c39423a693fdc26bed1627266e5911 --- gnu/system/vm.scm | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm index a2743453e7..42e9a08722 100644 --- a/gnu/system/vm.scm +++ b/gnu/system/vm.scm @@ -212,7 +212,8 @@ (define* (virtualized-operating-system os (define* (common-qemu-options image shared-fs #:key rw-image? - (target (%current-target-system))) + (target (%current-target-system)) + (system (%current-system))) "Return the a string-value gexp with the common QEMU options to boot IMAGE, with '-virtfs' options for the host file systems listed in SHARED-FS." @@ -223,7 +224,9 @@ (define* (common-qemu-options image shared-fs #~(;; Only enable kvm if we see /dev/kvm exists. ;; This allows users without hardware virtualization to still use these ;; commands. - #$@(if (and (not target) (file-exists? "/dev/kvm")) + #$@(if (and (not target) + (string=? system %system) + (file-exists? "/dev/kvm")) '("-enable-kvm") '()) @@ -308,7 +311,8 @@ (define* (system-qemu-image/shared-store-script os (map file-system-mapping-source (cons %store-mapping mappings)) #:rw-image? (not volatile?) - #:target target) + #:target target + #:system system) "-m " (number->string #$memory-size) #$@options)) base-commit: 9e9ec741d0dc5ce58f8d21d31800ff2cafce128f prerequisite-patch-id: 6183d199c58355eea1a85e1f1fe51f2f5fe44f65 -- 2.41.0