Thelie/taskwarrior.el
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Add function to turn taskwarrior timestamp into readable format

Browse source
This commit is contained in:
Patrick Winter 2018-10-31 21:08:46 +01:00
parent 1d2d76d972
commit fe518663c2
1 changed files with 12 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
taskwarrior.el
View file

@ -35,7 +35,7 @@
(defun taskwarrior--display-task-details-in-echo-area () (defun taskwarrior--display-task-details-in-echo-area ()
(let* ((id (taskwarrior-id-at-point)) (let* ((id (taskwarrior-id-at-point))
(task (taskwarrior-export-task id)) (task (taskwarrior-export-task id))
(due (alist-get 'due task))) (due (taskwarrior--parse-timestamp (alist-get 'due task))))
(message "Due: %s" due))) (message "Due: %s" due)))
(defun taskwarrior-previous-task () (defun taskwarrior-previous-task ()
@ -154,3 +154,14 @@ the front and focus it. Otherwise, create one and load the data."
(insert (if project (insert (if project
(format "%-2d (%05.2f) [%s] %s\n" id urgency project description) (format "%-2d (%05.2f) [%s] %s\n" id urgency project description)
(format "%-2d (%05.2f) %s\n" id urgency description))))))) (format "%-2d (%05.2f) %s\n" id urgency description)))))))
(defun taskwarrior--parse-timestamp (ts)
"Turn the taskwarrior timestamp into a readable format"
(let ((year (substring ts 0 4))
(month (substring ts 4 6))
(day (substring ts 6 8))
(hour (substring ts 9 11))
(minute (substring ts 11 13))
(second (substring ts 13 15)))
(format "%s-%s-%s %s:%s:%s" year month day hour minute second)))