( define-module ( channels ) #:use-module ( gnu home services guix ) #:use-module ( gnu services ) #:use-module ( guix channels ) ) ( define deployment ( let ( ( introduction ( make-channel-introduction "c24ce7cb11e74da13d491f9de3c4b7040a069f43" ( openpgp-fingerprint "590E 500F E39D 26B3 E60B 743B 6D81 B120 7711 899F" ) ) ) ( name 'deployment ) ( url "https://git.marekpasnikowski.pl/git/deployment.git" ) ) ( channel ( introduction introduction ) ( name name ) ( url url ) ) ) ) ( define guix ( let ( ( introduction ( make-channel-introduction "9edb3f66fd807b096b48283debdcddccfea34bad" ( openpgp-fingerprint "BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA" ) ) ) ( name 'guix ) ( url "https://git.savannah.gnu.org/git/guix.git" ) ) ( channel ( introduction introduction ) ( name name ) ( url url ) ) ) ) (define ruby-nano-bots (let ((branch "guix") (commit "92135778711a5496de7988a40c1aec95a41e16d7") (fingerprint "590E 500F E39D 26B3 E60B 743B 6D81 B120 7711 899F") (name 'ruby-nano-bots) (url "https://git.marekpasnikowski.pl/git/ruby-nano-bots.git")) (let ((key (openpgp-fingerprint fingerprint))) (channel (branch branch) (introduction (make-channel-introduction commit key)) (name name) (url url))))) ( define-public izumi-channels-service-type ( service home-channels-service-type ( list deployment guix ruby-nano-bots ) ) )