Added current manifest.scm
authorTom Balzer <niebieskitrociny@gmail.com>
Sun, 17 Mar 2019 08:44:29 +0000 (03:44 -0500)
committerTom Balzer <niebieskitrociny@gmail.com>
Sun, 17 Mar 2019 08:44:29 +0000 (03:44 -0500)
manifest.scm [new file with mode: 0644]

diff --git a/manifest.scm b/manifest.scm
new file mode 100644 (file)
index 0000000..52cef2e
--- /dev/null
@@ -0,0 +1,46 @@
+;;; Defines jobs and run order for use with tomd.
+
+(add-to-load-path "/home/niebie/sc/tomd/guile")
+
+(define-module (tomd manifest)
+  #:use-module (tomd job)
+  #:export (job-list))
+
+;;; job details:
+;;;  command-line
+;;;  args
+;;;  start-trigger (boot, shutdown, hourly, login, logout)
+;;;  end-trigger   (boot, shutdown, hourly, login, logout)
+
+(define set-bg-job
+  (create-job #:command-line "xsetroot"
+              #:args (list "-solid"
+                           "grey")
+              #:start-trigger 'login))
+
+(define start-fetchmail-job
+  (create-job #:command-line "fetchmail"
+              #:args (list "--ssl"
+                           "--verbose")
+              #:start-trigger 'login
+              #:end-trigger 'logout))
+
+(define start-emacs-daemon-job
+  (create-job #:command-line "emacs"
+              #:args (list "--daemon")
+              #:start-trigger 'login
+              #:end-trigger 'logout))
+
+(define start-spoon-job
+  (create-job #:command-line "/home/niebie/sc/spoon-fork/spoon"
+              #:start-trigger 'login
+              #:end-trigger 'logout
+              #:redirect #t
+              #:name "spoon"))
+
+(define job-list
+  (list set-bg-job
+        ;; start-fetchmail-job
+        ;; start-emacs-daemon-job
+        start-spoon-job
+        ))