mirror of
https://gitlab.univ-nantes.fr/glicid-public/guix-glicid.git
synced 2025-04-30 14:18:38 +02:00
50 lines
1.1 KiB
Scheme
50 lines
1.1 KiB
Scheme
(define-module (glicid packages virtualization)
|
||
#:use-module (guix packages)
|
||
#:use-module (guix utils)
|
||
#:use-module (gnu packages virtualization)
|
||
#:use-module (gnu packages storage) ;; «regular» ceph is defined here
|
||
#:use-module (glicid packages storage) ;; a «more up to date» version MAY be here
|
||
)
|
||
|
||
;;;;;;;;
|
||
|
||
(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" ) ;; will take the more up to date ceph
|
||
,@(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" ) ;; will take the more up to date ceph
|
||
,@(package-inputs qemu-minimal)))
|
||
|
||
)
|
||
)
|
||
|
||
|
||
|
||
|
||
;;; glicid/virtualizationvirtualization.scm ends here
|