Fix error when timesheet is empty
This commit is contained in:
parent
74fd7c820d
commit
0b795255ae
@ -718,8 +718,7 @@
|
||||
;;; Print last task
|
||||
(define (cmd-lasttask sheet deadlines archives . unused)
|
||||
(let ((last (last-task sheet)))
|
||||
(when (not (null? last))
|
||||
(format #t "~a\n" (path->string (car last)))))
|
||||
(format #t "~a\n" (if last (path->string (car last)) "")))
|
||||
(values #f #f #f))
|
||||
|
||||
;;; Deadlines
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user