--- /dev/null
+;;; 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
+ ))