diff options
-rw-r--r-- | lisp/acdw-org.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/acdw-org.el b/lisp/acdw-org.el index 13a1b88..bb72eb8 100644 --- a/lisp/acdw-org.el +++ b/lisp/acdw-org.el | |||
@@ -27,7 +27,7 @@ ELEMENT should be a list like that returned by `org-element-context'." | |||
27 | ;; MAYBE: Use `org-element-lineage'. | 27 | ;; MAYBE: Use `org-element-lineage'. |
28 | (when-let* ((parent (org-element-property :parent element))) | 28 | (when-let* ((parent (org-element-property :parent element))) |
29 | (or (eq type (car parent)) | 29 | (or (eq type (car parent)) |
30 | (unpackaged/org-element-descendant-of type parent)))) | 30 | (acdw-org/element-descendant-of type parent)))) |
31 | 31 | ||
32 | (defun acdw-org/return-dwim (&optional default) | 32 | (defun acdw-org/return-dwim (&optional default) |
33 | "A helpful replacement for `org-return'. With prefix, call `org-return'. | 33 | "A helpful replacement for `org-return'. With prefix, call `org-return'. |
@@ -241,6 +241,6 @@ the deletion might narrow the column." | |||
241 | (interactive "p") | 241 | (interactive "p") |
242 | (if (org-table-check-inside-data-field 'noerror) | 242 | (if (org-table-check-inside-data-field 'noerror) |
243 | (org-table-copy-down n) | 243 | (org-table-copy-down n) |
244 | (unpackaged/org-return-dwim n))) | 244 | (acdw-org/return-dwim n))) |
245 | 245 | ||
246 | (provide 'acdw-org) | 246 | (provide 'acdw-org) |