tribes/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00
Code Activity

marionette: Add support for QEMU's "quit" command.

Browse Source 
* gnu/build/marionette.scm (marionette-control): Don't wait for the
monitor prompt when the command was "quit".
This commit is contained in:
Chris Marusich
2018-07-30 22:47:43 -07:00
parent d973915e48
commit 4dd53a83b5
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
gnu/build/marionette.scm
View File

@@ -222,7 +222,8 @@ pcsys_monitor\")."
(($ <marionette> _ _ monitor)
(display command monitor)
(newline monitor)
(wait-for-monitor-prompt monitor))))
;; The "quit" command terminates QEMU immediately, with no output.
(unless (string=? command "quit") (wait-for-monitor-prompt monitor)))))
(define* (marionette-screen-text marionette
#:key