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)))
|