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