mirror of
https://gitlab.univ-nantes.fr/glicid-public/guix-glicid.git
synced 2025-04-30 22:28:38 +02:00
41 lines
878 B
Scheme
41 lines
878 B
Scheme
(define-module (glicid packages virtualization)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix utils)
|
|
#:use-module (gnu packages virtualization)
|
|
#:use-module (gnu packages storage)
|
|
#:use-module (glicid packages storage)
|
|
)
|
|
|
|
(define-public qemu-with-rbd
|
|
(package
|
|
(inherit qemu)
|
|
(name "qemu-with-rbd")
|
|
(arguments
|
|
(substitute-keyword-arguments `(
|
|
#:tests? #f
|
|
,@(package-arguments qemu)
|
|
))
|
|
)
|
|
(inputs `(
|
|
("ceph:lib", ceph "lib")
|
|
,@(package-inputs qemu)
|
|
))
|
|
)
|
|
)
|
|
|
|
(define-public qemu-minimal-with-rbd
|
|
(package
|
|
(inherit qemu-minimal)
|
|
(name "qemu-minimal-with-rbd")
|
|
(arguments
|
|
(substitute-keyword-arguments `(
|
|
#:tests? #f
|
|
,@(package-arguments qemu-minimal)
|
|
))
|
|
)
|
|
(inputs `(
|
|
("ceph:lib", ceph "lib" )
|
|
,@(package-inputs qemu-minimal)
|
|
))
|
|
)
|
|
)
|