blob: f8a41123b10911168de9e5e378cf2c8b5643f81b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
(define-module (deployment machine)
#:use-module ((deployment machine ssh)
#:prefix deployment:machine:ssh:)
#:use-module ((deployment systems aisaka)
#:prefix deployment:systems:aisaka:)
#:use-module ((deployment systems akashi)
#:prefix deployment:systems:akashi:)
#:use-module ((gnu machine)
#:prefix gnu:machine:)
#:use-module ((gnu machine ssh)
#:prefix gnu:machine:ssh:))
(define aisaka-machine
(gnu:machine:machine
(operating-system deployment:systems:aisaka:system)
(environment gnu:machine:ssh:managed-host-environment-type)
(configuration deployment:machine:ssh:aisaka-configuration)))
(define-public aisaka
(list aisaka-machine))
(define akashi-machine
(gnu:machine:machine
(operating-system deployment:systems:akashi:system)
(environment gnu:machine:ssh:managed-host-environment-type)
(configuration deployment:machine:ssh:akashi-configuration)))
(define-public akashi
(list akashi-machine))
|