From f1b0bfd81f10e048d6552a8604dc2ba582945147 Mon Sep 17 00:00:00 2001
From: Tyler Murphy <tylerm@tylerm.dev>
Date: Wed, 6 Sep 2023 22:23:01 -0400
Subject: fuck libvirt fuck libvirt fuck libvirt fuck libvirt fuck libvirt

---
 modules/home-packages/firmware.scm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 modules/home-packages/firmware.scm

(limited to 'modules/home-packages/firmware.scm')

diff --git a/modules/home-packages/firmware.scm b/modules/home-packages/firmware.scm
new file mode 100644
index 0000000..6e88992
--- /dev/null
+++ b/modules/home-packages/firmware.scm
@@ -0,0 +1,25 @@
+(define-module (home-packages firmware)
+               #: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 (guix gexp))
+
+(define-public ovmf-new
+  (package
+    (inherit ovmf)
+    (name "ovmf-new")
+    (arguments
+     (substitute-keyword-arguments (package-arguments ovmf)
+       ((#:phases phases)
+        #~(modify-phases #$phases
+            (replace 'install
+               (lambda _
+                 (let ((fmw (string-append #$output "/share/firmware")))
+                    (mkdir-p fmw)
+                    (copy-recursively "Build/OvmfX64/RELEASE_GCC49/FV" fmw)
+                   )))
+        ))))))
-- 
cgit v1.2.3-freya