aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorAndy Patterson <ajpatter@uwaterloo.ca>2017-10-15 16:03:27 -0400
committerLudovic Courtès <ludo@gnu.org>2017-10-19 12:17:44 +0200
commit4ad8fbd1856d7169ff457b6627b6a1259ac48ebd (patch)
tree52b1fce9d9c9d90d7016035586fd70c3b4a48192 /gnu
parentb764a9f5e0c0e21d4fd67518f1a308bed723731a (diff)
downloadguix-4ad8fbd1856d7169ff457b6627b6a1259ac48ebd.tar.gz
guix-4ad8fbd1856d7169ff457b6627b6a1259ac48ebd.zip
gnu: virt-manager: Fix default URI check.
Allows virt-manager to connect to qemu://system by default. * gnu/packages/virtualization.scm (virt-manager)[arguments]<#:phases>: Add 'fix-default-uri. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/virtualization.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index 0cfdbc1fab..b04bdbec94 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -515,6 +515,13 @@ virtualization library.")
(substitute* "virtcli/cliconfig.py"
(("/usr") (assoc-ref outputs "out")))
#t))
+ (add-after 'unpack 'fix-default-uri
+ (lambda* (#:key inputs #:allow-other-keys)
+ ;; xen is not available for now - so only patch qemu
+ (substitute* "virtManager/connect.py"
+ (("/usr(/bin/qemu-system)" _ suffix)
+ (string-append (assoc-ref inputs "qemu") suffix)))
+ #t))
(add-before 'wrap 'wrap-with-GI_TYPELIB_PATH
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((bin (string-append (assoc-ref outputs "out") "/bin"))