summaryrefslogtreecommitdiff
path: root/modules/home-packages/virtualization.scm
diff options
context:
space:
mode:
Diffstat (limited to 'modules/home-packages/virtualization.scm')
-rw-r--r--modules/home-packages/virtualization.scm28
1 files changed, 28 insertions, 0 deletions
diff --git a/modules/home-packages/virtualization.scm b/modules/home-packages/virtualization.scm
new file mode 100644
index 0000000..d048c0d
--- /dev/null
+++ b/modules/home-packages/virtualization.scm
@@ -0,0 +1,28 @@
+(define-module (home-packages virtualization)
+ #:use-module (guix packages)
+ #:use-module (guix utils)
+ #:use-module (gnu packages)
+ #:use-module (gnu packages package-management)
+ #:use-module (gnu packages build-tools)
+ #:use-module (gnu packages virtualization)
+ #:use-module (gnu packages firmware)
+ #:use-module (home-packages firmware)
+ #:use-module (guix gexp))
+
+(define-public virt-manager-new
+ (package
+ (inherit virt-manager)
+ (name "virt-manager-new")
+ (arguments
+ (substitute-keyword-arguments (package-arguments virt-manager)
+ ((#:phases phases)
+ #~(modify-phases #$phases
+ (add-after 'install 'ovmf
+ (lambda _
+ (let ((fmw (string-append #$output "/usr/share/OVMF")))
+ (mkdir-p fmw)
+ (copy-recursively #$(file-append ovmf-new "/share/firmware") fmw)
+ (mkdir-p fmw)
+ (copy-recursively "Build/OvmfX64/RELEASE_GCC49/FV" fmw)
+ )))
+ ))))))