diff options
Diffstat (limited to 'coorgi-client.el')
-rw-r--r-- | coorgi-client.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/coorgi-client.el b/coorgi-client.el index 5f296c7..6739837 100644 --- a/coorgi-client.el +++ b/coorgi-client.el @@ -31,14 +31,15 @@ :COORGI-VERSION) "List of properties coorgi cares about.") -(defun coorgi--find-heading (heading org-data) +(defun coorgi--find-headline (headline org-data) (car (org-element-map org-data 'headline (lambda (hl) (when (string-equal (org-element-property :raw-value hl) - (org-element-property :raw-value heading)) + (org-element-property :raw-value headline)) hl))))) (defun coorgify-at-point () + (interactive) (save-excursion (let* ((current-element (org-element-at-point)) (entry (if (not (equal (car current-element) 'heading)) |