system: vm: Use operating-system-kernel-arguments.
* gnu/system/vm.scm (system-qemu-image/shared-store-script): Use operating-system-kernel-arguments.
This commit is contained in:
parent
0315abe608
commit
83071b052a
|
@ -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)))
|
||||
|
|
Loading…
Reference in New Issue