[Timeline] Fix return value of headline getter

This commit is contained in:
Daniel - 2018-11-28 15:55:08 +01:00
parent b9d611d9bf
commit fc53fd8943
Signed by: dbo
GPG Key ID: 4F63DB96D45AA9C6
1 changed files with 3 additions and 2 deletions

View File

@ -109,8 +109,9 @@ Return whatever is found first."
(defun timeline-tools-entry-headline (entry)
"Return the headline associated with ENTRY."
(let* ((marker (timeline-tools-entry-marker entry)))
(org-with-point-at marker
(org-element-headline-parser (point-max)))))
(plist-get (cadr (org-with-point-at marker
(org-element-headline-parser (point-max))))
:raw-value)))
;; Utilities