diff options
-rw-r--r-- | etc/guix/home.scm | 40 |
1 files changed, 28 insertions, 12 deletions
diff --git a/etc/guix/home.scm b/etc/guix/home.scm index 71d6b68..3255f51 100644 --- a/etc/guix/home.scm +++ b/etc/guix/home.scm @@ -136,18 +136,34 @@ (define config-files `(("gnupg/gpg-agent.conf" ,gpg-agent.conf) - ("git/config" ,gitconfig))) - -(define (dot-config) - (define (prefix-with-config s) - (string-append (substring (getenv "XDG_CONFIG_HOME") - (+ 1 (string-length (getenv "HOME")))) - "/" - s)) - (map (lambda (t) - (list (prefix-with-config (first t)) - (second t))) - config-files)) + ("git/config" ,gitconfig) + ("ssh/config" ,ssh.conf))) + +(define dot-config + (let ((prefix-with-config + (lambda (s) + (string-append (substring (getenv "XDG_CONFIG_HOME") + (+ 1 (string-length (getenv "HOME")))) + "/" + s)))) + (map (lambda (t) + (list (prefix-with-config (first t)) + (second t))) + config-files))) + + +(define jobs + '() + #; + (list + ;; FIXME + #~(job "* * * * *" "echo foi > ~/foi") + #~(job "* * * * *" "backup -h 2>&1 > ~/bk") + #~(job "* * * * *" "which backup -h 2>&1 > ~/which-bk") + #~(job "* * * * *" "echo $PATH 2>&1 > ~/path") + #~(job "* * * * *" "echo 123") + #~(job "* * * * *" "echo 123 > k") + #~(job "* * * * *" "date > ~/job"))) (home-environment (packages |