XEmacs compatibility patch

* lisp/org-list.el (org-list-parse-list): Use `org-looking-at-p'.
This commit is contained in:
Carsten Dominik 2010-11-03 23:16:37 +01:00
parent 7f79007e52
commit d5e2031bc7
1 changed files with 1 additions and 1 deletions

View File

@ -2029,7 +2029,7 @@ sublevels as a list of strings."
(while (org-search-forward-unenclosed org-item-beginning-re end t)
(save-excursion
(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)
(t 'unordered))))
(let* ((indent1 (org-get-indentation))