05/09: system: vm: Use operating-system-kernel-arguments.

[Danny Milosavljevic]

dannym pushed a commit to branch master
in repository guix.

commit 83071b052a0585f7166245b7ba793436e104f8fe
Author: Danny Milosavljevic <address@hidden>
Date:   Fri Apr 21 14:37:11 2017 +0200

    system: vm: Use operating-system-kernel-arguments.
    
    * gnu/system/vm.scm (system-qemu-image/shared-store-script):
    Use operating-system-kernel-arguments.
---
 gnu/system/vm.scm | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm
index 4f915c4..2c8b954 100644
--- a/gnu/system/vm.scm
+++ b/gnu/system/vm.scm
@@ -490,11 +490,8 @@ it is mostly useful when FULL-BOOT?  is true."
                                 #:full-boot? full-boot?
                                 #:disk-image-size disk-image-size)))
     (define kernel-arguments
-      #~(list "--root=/dev/vda1"
-              (string-append "--system=" #$os-drv)
-              (string-append "--load=" #$os-drv "/boot")
-              #$@(if graphic? #~() #~("console=ttyS0"))
-              #+@(operating-system-user-kernel-arguments os)))
+      #~(list #$@(if graphic? #~() #~("console=ttyS0"))
+              #+@(operating-system-kernel-arguments os os-drv "/dev/vda1")))
 
     (define qemu-exec
       #~(list (string-append #$qemu "/bin/" #$(qemu-command (%current-system)))