Handle if task does bot have due date set in eldoc message

This commit is contained in:
Patrick Winter 2018-12-04 20:44:36 +01:00
parent 032f4036ad
commit f1fad58220

View file

@ -41,7 +41,8 @@
(let* ((id (taskwarrior-id-at-point)) (let* ((id (taskwarrior-id-at-point))
(task (taskwarrior-export-task id)) (task (taskwarrior-export-task id))
(due (taskwarrior--parse-timestamp (alist-get 'due task)))) (due (taskwarrior--parse-timestamp (alist-get 'due task))))
(message "Due: %s" due))) (when due
(message "Due: %s" due))))
(defun taskwarrior-previous-task () (defun taskwarrior-previous-task ()
(interactive) (interactive)
@ -207,13 +208,17 @@ the front and focus it. Otherwise, create one and load the data."
(defun taskwarrior--parse-timestamp (ts) (defun taskwarrior--parse-timestamp (ts)
"Turn the taskwarrior timestamp into a readable format" "Turn the taskwarrior timestamp into a readable format"
(let ((year (substring ts 0 4)) (if (not ts)
(month (substring ts 4 6)) ts
(day (substring ts 6 8)) (let ((year (substring ts 0 4))
(hour (substring ts 9 11)) (month (substring ts 4 6))
(minute (substring ts 11 13)) (day (substring ts 6 8))
(second (substring ts 13 15))) (hour (substring ts 9 11))
(format "%s-%s-%s %s:%s:%s" year month day hour minute second))) (minute (substring ts 11 13))
(second (substring ts 13 15)))
(format "%s-%s-%s %s:%s:%s" year month day hour minute second))))
(global-set-key (kbd "C-x t") 'taskwarrior) (global-set-key (kbd "C-x t") 'taskwarrior)
(taskwarrior--set-filter "project:pro5")
(message (car taskwarrior-active-filters))