mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-29 19:37:52 +00:00
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:
parent
37f94d235d
commit
e6776ce711
|
@ -2836,7 +2836,7 @@ ignores hidden links."
|
||||||
((= dcst ?t) '<)))
|
((= dcst ?t) '<)))
|
||||||
(next-record (lambda ()
|
(next-record (lambda ()
|
||||||
(skip-chars-forward " \r\t\n")
|
(skip-chars-forward " \r\t\n")
|
||||||
(beginning-of-line)))
|
(or (eobp) (beginning-of-line))))
|
||||||
(end-record (lambda ()
|
(end-record (lambda ()
|
||||||
(goto-char (org-list-get-item-end-before-blank
|
(goto-char (org-list-get-item-end-before-blank
|
||||||
(point) struct))))
|
(point) struct))))
|
||||||
|
|
Loading…
Reference in a new issue