mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add function to add a single headline from my tasks

Browse source 
Add function to create single story element from a prompted list of active stories.
This commit is contained in:
Tatu Lahtela 2020-06-12 11:31:32 +03:00 committed by Griffin Smith
parent f00c22a49a
commit 8838454236
1 changed files with 15 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
org-clubhouse.el
View file

@ -1030,6 +1030,21 @@ which labels to set."
"\n")
""))))
(defun org-clubhouse-headline-from-my-tasks (level)
"Prompt my active stories and create a single `org-mode' headline at LEVEL."
(interactive "*nLevel: \n")
(if org-clubhouse-username
(let* ((story-list (org-clubhouse--search-stories
(format "owner:%s !is:done !is:archived"
org-clubhouse-username)))
(stories (to-id-name-pairs story-list)))
(org-clubhouse-headline-from-story-id level
(find-match-in-alist
(ivy-read "Select Story: "
(-map #'cdr stories))
stories)))
(warn "Can't fetch my tasks if `org-clubhouse-username' is unset")))
(defun org-clubhouse-headline-from-story-id (level story-id)
"Create a single `org-mode' headline at LEVEL based on the given clubhouse STORY-ID."
(interactive "*nLevel: \nnStory ID: ")