aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--etc/guix/home.scm40
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