summaryrefslogtreecommitdiff
path: root/bog.el
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-02-05 23:55:19 -0500
committerKyle Meyer <kyle@kyleam.com>2014-02-05 23:59:54 -0500
commitd255087563f31bae7ed3226db9388b568bb1844e (patch)
tree2c0103eb71e4767c9df7e071c85e1c1ce0405f28 /bog.el
parentf2da176b8063f403a0ad22b89873b488eeb0ac5b (diff)
downloadbog-d255087563f31bae7ed3226db9388b568bb1844e.tar.gz
Use org-get-heading
Somehow I missd this one when I was searching through org.el.
Diffstat (limited to 'bog.el')
-rw-r--r--bog.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/bog.el b/bog.el
index fe1ac8d..69a5bdc 100644
--- a/bog.el
+++ b/bog.el
@@ -147,12 +147,10 @@ year, and the first meaningful word in the title)."
(save-excursion
(save-restriction
(widen)
- (org-back-to-heading)
- (let ((heading (org-element-property :raw-value (org-element-at-point))))
+ (let ((heading (org-no-properties (org-get-heading t t))))
(while (and (not (bog-citekey-only-p heading))
(org-up-heading-safe))
- (setq heading
- (org-element-property :raw-value (org-element-at-point))))
+ (setq heading (org-no-properties (org-get-heading t t))))
(when (not (bog-citekey-only-p heading))
(error "Citekey not found"))
heading))))