emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* `org-element-cache-map' misses elements at end of buffer
@ 2024-04-18 13:33 Morgan Smith
  2024-04-19 11:39 ` Morgan Smith
  2024-04-19 13:29 ` Ihor Radchenko
  0 siblings, 2 replies; 6+ messages in thread
From: Morgan Smith @ 2024-04-18 13:33 UTC (permalink / raw)
  To: emacs-orgmode

[-- Attachment #1: Type: text/plain, Size: 588 bytes --]

Hello!

I may or may not have been trying to rewrite `org-clock-sum' for like
the 5th time.

Anyways I was wanting to parse a file using `org-element-cache-map' that
looked roughly like this:

========
* clock
:LOGBOOK:
CLOCK: [2024-03-24 Sun 15:18]--[2024-03-24 Sun 15:39] =>  0:21
:END:
=======

However I couldn't get the clock element this way.  After much trail and
error I found that simply adding another heading on the end allowed me
to get the clock element!

I've attached a test so you can reproduce the problem.  In the test it
is a paragraph element that is not showing up.


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-failing-test.patch --]
[-- Type: text/x-patch, Size: 1212 bytes --]

From 9deff2111b73bb2ceb9127db5d88486affa04f0b Mon Sep 17 00:00:00 2001
From: Morgan Smith <Morgan.J.Smith@outlook.com>
Date: Thu, 18 Apr 2024 09:18:51 -0400
Subject: [PATCH] failing test

---
 testing/lisp/test-org-element.el | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/testing/lisp/test-org-element.el b/testing/lisp/test-org-element.el
index 8b2cf1642..313556f49 100644
--- a/testing/lisp/test-org-element.el
+++ b/testing/lisp/test-org-element.el
@@ -4983,6 +4983,19 @@ Text
 
 \f
 ;;; Test Cache.
+(ert-deftest test-org-element/cache-map ()
+  "Test `org-element-cache-map'."
+  (org-test-with-temp-text "* headline\n:DRAWER:\nparagraph\n:END:\n* headline 2"
+    (should
+     (equal
+      '(org-data headline section drawer paragraph headline)
+      (org-element-cache-map #'car :granularity 'element))))
+  (org-test-with-temp-text "* headline\n:DRAWER:\nparagraph\n:END:"
+    (should
+     (equal
+      ;; This fails because paragraph isn't found!
+      '(org-data headline section drawer paragraph)
+      (org-element-cache-map #'car :granularity 'element)))))
 
 (ert-deftest test-org-element/cache ()
   "Test basic expectations and common pitfalls for cache."
-- 
2.41.0


^ permalink raw reply related	[flat|nested] 6+ messages in thread

end of thread, other threads:[~2024-04-21 17:31 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2024-04-18 13:33 `org-element-cache-map' misses elements at end of buffer Morgan Smith
2024-04-19 11:39 ` Morgan Smith
2024-04-21 11:48   ` Ihor Radchenko
2024-04-21 16:06     ` Morgan Smith
2024-04-21 17:31       ` Ihor Radchenko
2024-04-19 13:29 ` Ihor Radchenko

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).