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
This commit is contained in:
Kyle Meyer 2020-09-15 22:50:05 -04:00
parent 38fbd161e4
commit 73c929e3b5
1 changed files with 1 additions and 1 deletions

View File

@ -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)