ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 05:48:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: docker: Fix test.

Browse source 
* gnu/tests/docker.scm (run-docker-test): Set memory and disk size.
(%docker-os): Add elogind service.
This commit is contained in:
Danny Milosavljevic 2019-01-10 05:10:03 +01:00
parent 60893e5c84
commit dc4b4a38fa
No known key found for this signature in database
GPG key ID: E71A35542C30BAA5
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gnu/tests/docker.scm
View file

@ -25,6 +25,7 @@ (define-module (gnu tests docker)
#:use-module (gnu services dbus) #:use-module (gnu services dbus)
#:use-module (gnu services networking) #:use-module (gnu services networking)
#:use-module (gnu services docker) #:use-module (gnu services docker)
#:use-module (gnu services desktop)
#:use-module (gnu packages docker) #:use-module (gnu packages docker)
#:use-module (guix gexp) #:use-module (guix gexp)
#:use-module (guix store) #:use-module (guix store)
@ -35,6 +36,7 @@ (define %docker-os
(service dhcp-client-service-type) (service dhcp-client-service-type)
(dbus-service) (dbus-service)
(polkit-service) (polkit-service)
(service elogind-service-type)
(service docker-service-type))) (service docker-service-type)))
(define (run-docker-test) (define (run-docker-test)
@ -48,6 +50,8 @@ (define os
(define vm (define vm
(virtual-machine (virtual-machine
(operating-system os) (operating-system os)
(memory-size 500)
(disk-image-size (* 250 (expt 2 20)))
(port-forwardings '()))) (port-forwardings '())))
(define test (define test