org-list.el (org-sort-list): Fix infloop

* org-list.el (org-sort-list): Fix infloop.

Thanks to Samuel Wales for reporting this.
This commit is contained in:
Bastien Guerry 2013-04-22 00:24:39 +02:00
parent 37f94d235d
commit e6776ce711
1 changed files with 1 additions and 1 deletions

View File

@ -2836,7 +2836,7 @@ ignores hidden links."
((= dcst ?t) '<)))
(next-record (lambda ()
(skip-chars-forward " \r\t\n")
(beginning-of-line)))
(or (eobp) (beginning-of-line))))
(end-record (lambda ()
(goto-char (org-list-get-item-end-before-blank
(point) struct))))