( define-module ( channels )
  #:use-module ( gnu home services guix )
  #:use-module ( gnu services )
  #:use-module ( guix channels ) )

(define marekpasnikowski-fingerprint
  "590E 500F E39D 26B3 E60B 743B 6D81 B120 7711 899F")

( define deployment
  ( let
      ( ( introduction
	  ( make-channel-introduction
	    "c24ce7cb11e74da13d491f9de3c4b7040a069f43"
	    ( openpgp-fingerprint marekpasnikowski-fingerprint ) ) )
	( 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-babosa
  (let ((branch "guix")
	(commit "002e14e888b1af50c77e30849edb62cc416397cf")
	(fingerprint marekpasnikowski-fingerprint)
	(name 'ruby-babosa)
	(url "https://git.marekpasnikowski.pl/git/babosa.git"))
    (let ((key (openpgp-fingerprint fingerprint)))
      (channel (branch branch)
	       (introduction (make-channel-introduction commit key))
	       (name name)
	       (url url)))))

(define ruby-nano-bots
  (channel
   (name 'ruby-nano-bots)
   (url "https://git.marekpasnikowski.pl/git/ruby-nano-bots.git")
   (branch "guix")
   (introduction
    (make-channel-introduction
     "92135778711a5496de7988a40c1aec95a41e16d7"
     (openpgp-fingerprint marekpasnikowski-fingerprint)))))

(define ruby-sweet-moon
  (channel
   (name 'ruby-sweet-moon)
   (url "https://git.marekpasnikowski.pl/git/sweet-moon.git")
   (branch "guix")
   (introduction
    (make-channel-introduction
     "1c15421c443c6e1f741c285e58e848beb6754048"
     (openpgp-fingerprint marekpasnikowski-fingerprint)))))

(define-public izumi-channels-service-type
  (service
   home-channels-service-type
   (list deployment guix ruby-babosa ruby-nano-bots ruby-sweet-moon)))