mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
gnu: /etc/qemu/firmware: Produce only /etc/qemu/firmware instead of /etc/qemu
The service unnecessarily populates /etc/qemu with a symlink, so it's not possible to write files like /etc/qemu/bridge.conf or /etc/qemu/host.conf anymore. Since etc-service-type uses file-union, it's possible to put files in subdirectories. This restores the behavior suggested by manual where user can extend etc-service-type with qemu/host.conf etc. * gnu/services/virtualization.scm (/etc/qemu/firmware): Extend with qemu/firmware instead of qemu Change-Id: I7c1ea790e5abf7ad05dce56b7901ac6eb90208fd Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
parent
efcf1a2334
commit
f29c25ad78
1 changed files with 2 additions and 3 deletions
|
@ -508,14 +508,13 @@ avoid potential infinite waits blocking libvirt."))
|
||||||
|
|
||||||
(define (/etc/qemu/firmware config)
|
(define (/etc/qemu/firmware config)
|
||||||
(let ((firmwares (libvirt-configuration-firmwares config)))
|
(let ((firmwares (libvirt-configuration-firmwares config)))
|
||||||
`(("qemu"
|
`(("qemu/firmware"
|
||||||
,(computed-file
|
,(computed-file
|
||||||
"etc-qemu-firmware"
|
"etc-qemu-firmware"
|
||||||
(with-imported-modules '((guix build union))
|
(with-imported-modules '((guix build union))
|
||||||
#~(begin
|
#~(begin
|
||||||
(use-modules (guix build union) (srfi srfi-26))
|
(use-modules (guix build union) (srfi srfi-26))
|
||||||
(mkdir #$output)
|
(union-build #$output
|
||||||
(union-build (string-append #$output "/firmware")
|
|
||||||
(map (cut string-append <> "/share/qemu/firmware")
|
(map (cut string-append <> "/share/qemu/firmware")
|
||||||
(list #$@firmwares))))))))))
|
(list #$@firmwares))))))))))
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue