diff options
| -rw-r--r-- | org-link-edit.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/org-link-edit.el b/org-link-edit.el index 0c2cc27..e83b12a 100644 --- a/org-link-edit.el +++ b/org-link-edit.el @@ -67,12 +67,7 @@ (require 'cl-lib) (defun org-link-edit--on-link-p (&optional element) - (let ((el (or element (org-element-context)))) - ;; Don't use `org-element-lineage' because it isn't available - ;; until Org version 8.3. - (while (and el (not (memq (car el) '(link)))) - (setq el (org-element-property :parent el))) - (eq (car el) 'link))) + (org-element-lineage (or element (org-element-context)) '(link) t)) (defun org-link-edit--link-data () "Return list with information about the link at point. |