aboutsummaryrefslogtreecommitdiffstats
path: root/nichijou/home/host/siga.scm
blob: 5ab32e184a86075ba71e5d95d27ee2b6f5ea68fb (plain) (blame)
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
(define-module (nichijou home host siga)
  #:use-module (gnu home)
  #:use-module (srfi srfi-1)
  #:use-module ((nichijou home nvim)
                #:prefix nvim:)
  #:use-module ((nichijou home mpd)
                #:prefix mpd:)
  #:use-module ((nichijou home mpv)
                #:prefix mpv:)
  #:use-module ((nichijou home zsh)
                #:prefix zsh:))

;; TODO: Think of a better approach to do this.
;; What if a module's get-packages function expects different parameters?
;; Should modules (packages) be forced to implement the same get-packages
;; signature? If so, how?
(define (apply-get-packages m)
  (m:get-packages #:foreign-distro? #t))

(home-environment
  (packages (fold append
                  (list)
                  (map apply-get-packages
                       (list mpd mpv nvim zsh))))
  (services (append mpd:services mpv:services nvim:services zsh:services)))