diff options
author | shoshin <shoshin@cicadas.surf> | 2022-11-16 20:22:24 -0600 |
---|---|---|
committer | shoshin <shoshin@cicadas.surf> | 2022-11-16 20:22:24 -0600 |
commit | 5debd49d6474d0f0ddd2003b282d157f6a1a5a37 (patch) | |
tree | 4897f53e34a99076e3c8749933dc02869f61cbb6 /coorgi-client.el | |
parent | 1a0ad2af6a8efc1fb672d6cea751314d0b6d953e (diff) |
Clean: heading -> headline and some org doc notes
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)) |