blob: b28e204492768329861ea35438ca1164c4cee15c (
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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
(define-module (channels)
#:use-module (gnu home services guix)
#:use-module (gnu services)
#:use-module (guix channels))
;;; Fingerprints
(define marekpasnikowski-fingerprint
(openpgp-fingerprint "590E 500F E39D 26B3 E60B 743B 6D81 B120 7711 899F"))
(define mbakke-fingerprint
(openpgp-fingerprint "BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA"))
(define nonguix-fingerprint
(openpgp-fingerprint "2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5"))
;;; Introductions
(define deployment-introduction
(make-channel-introduction "c24ce7cb11e74da13d491f9de3c4b7040a069f43"
marekpasnikowski-fingerprint))
(define distribution-introduction
(make-channel-introduction "7d17bded11ef1239592e6e5abd40ceee1e99cbb8"
marekpasnikowski-fingerprint))
(define guix*-introduction
(make-channel-introduction "9edb3f66fd807b096b48283debdcddccfea34bad"
mbakke-fingerprint))
(define nonguix-introduction
(make-channel-introduction "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
nonguix-fingerprint))
;;; Channels
(define deployment
(channel (name 'deployment)
(url "https://git.marekpasnikowski.pl/git/deployment.git")
(introduction deployment-introduction)))
(define distribution
(channel (name 'distribution)
(url "https://git.marekpasnikowski.pl/git/distribution.git")
(introduction distribution-introduction)))
;;; Channel lists
(define aisaka-channels
(append %default-channels
(list deployment
distribution)))
(define izumi-channels
(append %default-channels
(list deployment
distribution)))
;;; Channel services
(define-public aisaka-channels-service-type
(simple-service 'aisaka-channels
home-channels-service-type
aisaka-channels))
(define-public izumi-channels-service-type
(simple-service 'izumi-channels
home-channels-service-type
izumi-channels))
|
