diff options
| author | Renken <renken@shione.net> | 2022-09-09 18:02:28 +0200 |
|---|---|---|
| committer | Renken <renken@shione.net> | 2022-09-09 18:08:49 +0200 |
| commit | e3706ce50fee2d4fc32f9bdaf455846422792edb (patch) | |
| tree | 23dc91a66d5efacc2b17e09d83774e9f8add3834 /nichijou/home/host | |
| parent | 3084d6586919cf4129548cd59321553e3faffb04 (diff) | |
| download | shione-e3706ce50fee2d4fc32f9bdaf455846422792edb.tar.gz shione-e3706ce50fee2d4fc32f9bdaf455846422792edb.zip | |
home: siga: run guix on a foreign distro
Diffstat (limited to 'nichijou/home/host')
| -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))) |