Hi cj
At Mon, 13 Aug 2012 13:50:09 -0400,
Christopher J. White wrote:
> I have a capture template that does almost exactly that, I just use a
> user entered subheading -- should be easy enough to tweak for your task.
Yes indeed, thank you very much!
Simon
> Capture template:
>
> ("d" "Discussion Item" item
> (file+function
> "~/org/Todo.org"
> (lambda ()
> (let* ((ctxt (read-string "Discussion context: "))
> (ctxt-pt
> (condition-case msg
> (org-find-olp (list "Discussion Items" ctxt) t)
> (error nil))))
> (if ctxt-pt
> (progn
> (goto-char ctxt-pt)
> (org-end-of-subtree)
> (insert-string "\n"))
> (goto-char (org-find-olp (list "Discussion Items") t))
> (org-end-of-subtree)
> (insert-string (format "\n** %s\n" ctxt)))))))