Browse Source

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

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

Thanks to Samuel Wales for reporting this.
Bastien Guerry 12 years ago
parent
commit
e6776ce711
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/org-list.el

+ 1 - 1
lisp/org-list.el

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