mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-23 11:18:41 +00:00
XEmacs compatibility patch
* lisp/org-list.el (org-list-parse-list): Use `org-looking-at-p'.
This commit is contained in:
parent
7f79007e52
commit
d5e2031bc7
|
@ -2029,7 +2029,7 @@ sublevels as a list of strings."
|
||||||
(while (org-search-forward-unenclosed org-item-beginning-re end t)
|
(while (org-search-forward-unenclosed org-item-beginning-re end t)
|
||||||
(save-excursion
|
(save-excursion
|
||||||
(beginning-of-line)
|
(beginning-of-line)
|
||||||
(setq ltype (cond ((looking-at-p "^[ \t]*[0-9]") 'ordered)
|
(setq ltype (cond ((org-looking-at-p "^[ \t]*[0-9]") 'ordered)
|
||||||
((org-at-item-description-p) 'descriptive)
|
((org-at-item-description-p) 'descriptive)
|
||||||
(t 'unordered))))
|
(t 'unordered))))
|
||||||
(let* ((indent1 (org-get-indentation))
|
(let* ((indent1 (org-get-indentation))
|
||||||
|
|
Loading…
Reference in a new issue