Changed default value for tasks without names.

diff --git a/guile/tomd/job.scm b/guile/tomd/job.scm
index 51492c0..b46cfdd 100644 (file)
--- a/guile/tomd/job.scm
+++ b/guile/tomd/job.scm
@@ -66,7 +66,7 @@
         (args          (get-keyword-value rest #:args          (list)))
         (start-trigger (get-keyword-value rest #:start-trigger 'login))
         (end-trigger   (get-keyword-value rest #:end-trigger   #f))
-        (name          (get-keyword-value rest #:name          #f)))
+        (name          (get-keyword-value rest #:name          "default")))
     ;; do thing with keyword-ed variables
     ;; (display "settings:") (newline)
     ;; (format (current-output-port)