diff options
Diffstat (limited to 'modules/home-packages/virtualization.scm')
| -rw-r--r-- | modules/home-packages/virtualization.scm | 41 |
1 files changed, 0 insertions, 41 deletions
diff --git a/modules/home-packages/virtualization.scm b/modules/home-packages/virtualization.scm index 64d882d..e87b0e0 100644 --- a/modules/home-packages/virtualization.scm +++ b/modules/home-packages/virtualization.scm @@ -6,7 +6,6 @@ #: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 libvirt-new @@ -25,9 +24,6 @@ (let ((fmw (string-append #$output "/share/qemu"))) (mkdir-p fmw) (copy-recursively #$(file-append qemu "/share/qemu") fmw)) - (let ((fmw (string-append #$output "/usr/share/OVMF"))) - (mkdir-p fmw) - (copy-recursively #$(file-append ovmf-new "/share/firmware") fmw)) )) )))))) @@ -47,42 +43,5 @@ (let ((fmw (string-append #$output "/share/qemu"))) (mkdir-p fmw) (copy-recursively #$(file-append qemu "/share/firmware") fmw)) - (let ((fmw (string-append #$output "/usr/share/OVMF"))) - (mkdir-p fmw) - (copy-recursively #$(file-append ovmf-new "/share/firmware") fmw)) )) )))))) - -;; (define-public libvirt-new -;; (package -;; (inherit libvirt) -;; (inputs -;; (modify-inputs (package-inputs libvirt) -;; (append ovmf-new))) -;; (arguments -;; (substitute-keyword-arguments (package-arguments libvirt) -;; ((#: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)) -;; )) -;; )))))) - -;; (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) -;; ))) -;; )))))) |