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

Display priority in task list

Browse source
This commit is contained in:
Patrick Winter 2019-05-21 09:52:47 +02:00
parent 6ab4ae183c
commit 828f61e4fc
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
taskwarrior.el
View file

@ -287,12 +287,13 @@ the front and focus it. Otherwise, create one and load the data."
(dolist (entry entries) (dolist (entry entries)
(let* ((id (format "%-2d" (alist-get 'id entry))) (let* ((id (format "%-2d" (alist-get 'id entry)))
(urgency (format "(%05.2f)" (alist-get 'urgency entry))) (urgency (format "(%05.2f)" (alist-get 'urgency entry)))
(tags (format "%s" (taskwarrior--concat-tag-list (alist-get 'tags entry)))) (priority (format "%s" (or (alist-get 'priority entry) " ")))
(project (format "[%s]" (alist-get 'project entry))) (project (format "[%s]" (alist-get 'project entry)))
(tags (format "%s" (taskwarrior--concat-tag-list (alist-get 'tags entry))))
;; (project-max-length (taskwarrior--get-max-length 'project entries)) ;; (project-max-length (taskwarrior--get-max-length 'project entries))
;; (project-spacing (- project-max-length (length project))) ;; (project-spacing (- project-max-length (length project)))
(description (alist-get 'description entry))) (description (alist-get 'description entry)))
(insert (concat " " id " " urgency " " project " " tags " " description "\n")))))) (insert (concat " " id " " urgency " " priority " " project " " tags " " description "\n"))))))
(defun taskwarrior--concat-tag-list (tags) (defun taskwarrior--concat-tag-list (tags)