branch: elpa/dslide commit be47f2dcb939779067f8c77c3493162bcf242b83 Author: Psionik K <73710933+psioni...@users.noreply.github.com> Commit: Psionik K <73710933+psioni...@users.noreply.github.com>
remove call to org-element-parent this seems to be inconsistently supported. It does nothing interesting, so it makes sense that it isn't supported everywhere Small bug, but worthy of a release --- NEWS.org | 4 +++- dslide.el | 5 +++-- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/NEWS.org b/NEWS.org index 11422f6898..2fb430bf37 100644 --- a/NEWS.org +++ b/NEWS.org @@ -11,6 +11,8 @@ #+select_tags: latest #+export_file_name: RELEASE +* v0.6.2 Minor Bug Fix :latest: +💩 ~org-element-parent~ call was removed * v0.6.1 The Toddling :latest: Fixing bugs and filling some gaps in new features. ** Added 🎅 @@ -30,7 +32,7 @@ Fixing bugs and filling some gaps in new features. - kmacro action properly skips over non-matching directions when both forward and backward elements are present in a slide - 🚧 kmacro playback of =M-<return>= and =M-<backspace>= and others is now correct. There are likely more events that don't round trip nicely from ~last-kbd-macro~ through ~key-description~ and back through ~read-kbd-macro~. *File issues*. - 🚧 kmacro playback no longer aborts when inputs from file-notify etc occur. It can be quit with =C-g=. A more comprehensive solution is being developed. -* v0.6.0 Fighting Spam 💌 +* v0.6.0 Fighting Spam 💌 :latest: - There is less markup (especially for babel) - Old actions are easier to use - New actions (*KMACROS!*) fit a more clear pattern diff --git a/dslide.el b/dslide.el index 092a599447..2c927adba0 100644 --- a/dslide.el +++ b/dslide.el @@ -4,7 +4,7 @@ ;; Copyright (C) 2024 Positron ;; ;; Author: Positron <contact@positron.solutions> -;; Version: 0.6.1 +;; Version: 0.6.2 ;; Package-Requires: ((emacs "29.2")) ;; Maintainer: Positron <contact@positron.solutions> ;; URL: https://github.com/positron-solutions/dslide @@ -2689,7 +2689,8 @@ PRED, INFO, FIRST-MATCH, and NO-RECURSION are described in (defun dslide--section (heading) "Get the section of a HEADING." (cl-labels ((section-p (element) - (if (eq (org-element-property :begin (org-element-parent element)) + (if (eq (org-element-property + :begin (org-element-property :parent element)) (org-element-property :begin heading)) (throw 'section element) (throw 'section nil))))