Fix crash without timesheet file

2019-07-15 15:58:41 +03:00
parent 41f8f43ce5
commit 26c29023d8
1 changed files with 1 additions and 1 deletions
--- a/worktimer.scm
+++ b/worktimer.scm
@@ -414,7 +414,7 @@
                                      (format #t "Warning: Line '~a' is not a archive path. Skip.\n" line)
                                      archives)))))
                       (else (loop record-type timerecords deadlines archives)))))))))))
-      (values '() '())))
+      (values '() '() '())))

 ;;; Print deadline record
 (define (print-deadline dline)