diff options
Diffstat (limited to 'nichijou/home')
| -rw-r--r-- | nichijou/home/host/siga.scm | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/nichijou/home/host/siga.scm b/nichijou/home/host/siga.scm index 2f86088..5ab32e1 100644 --- a/nichijou/home/host/siga.scm +++ b/nichijou/home/host/siga.scm @@ -1,5 +1,6 @@ (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) @@ -9,6 +10,16 @@ #: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 (append nvim:packages mpd:packages mpv:packages zsh:packages)) - (services (append nvim:services mpd:services mpv:services zsh:services))) + (packages (fold append + (list) + (map apply-get-packages + (list mpd mpv nvim zsh)))) + (services (append mpd:services mpv:services nvim:services zsh:services))) |