summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2020-09-15 22:50:05 -0400
committerKyle Meyer <kyle@kyleam.com>2020-09-16 21:53:57 -0400
commit73c929e3b507db9ee2867d35d10c8f393ff4d38d (patch)
tree71fcefcceecd1e77c6498cb5092cc588af62614d
parent38fbd161e4478d1cfdea1c3c65b9024232f15f06 (diff)
downloadorg-mode-73c929e3b507db9ee2867d35d10c8f393ff4d38d.tar.gz
org-element: Swap pcase patterns to avoid Emacs 24 error
* lisp/org-element.el (org-element--next-mode): Reorder two patterns to sidestep an error on Emacs 24. The valid pattern introduced in 4a27b67fd (org-element: Fix property drawers parsing, 2020-04-22) makes entering Org mode in Emacs 24.5 fail with "Eager macro-expansion failure: (wrong-type-argument listp :pcase--succeed)". This seems to be due to a bug fixed in Emacs 25. Reported-by: Jens Lechtenboerger <lechten@wi.uni-muenster.de> Ref: https://orgmode.org/list/87pn6n5u13.fsf@wi.uni-muenster.de
-rw-r--r--lisp/org-element.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el
index a693cb6..755de86 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -4324,7 +4324,7 @@ located inside the current one. "
(if parent?
(pcase type
(`headline 'section)
- ((and `section (guard (eq mode 'first-section))) 'top-comment)
+ ((and (guard (eq mode 'first-section)) `section) 'top-comment)
(`inlinetask 'planning)
(`plain-list 'item)
(`property-drawer 'node-property)