summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <n.goaziou@gmail.com>2010-07-12 14:31:20 +0200
committerNicolas Goaziou <n.goaziou@gmail.com>2010-09-01 19:05:44 +0200
commit2dec9eb4736ae45f8e8afca303442188f97b7f21 (patch)
treea69dbe8c46b0478beffbe2c4ec758ca72b8964c8
parentf7f07198dd1331424cb02ca66e91b7d010152595 (diff)
downloadorg-mode-2dec9eb4736ae45f8e8afca303442188f97b7f21.tar.gz
Fix regression in `org-sort-list'.
* lisp/org-list.el (org-sort-list): end-rec function was ill-defined.
-rw-r--r--lisp/org-list.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-list.el b/lisp/org-list.el
index 0647a40..721f681 100644
--- a/lisp/org-list.el
+++ b/lisp/org-list.el
@@ -1260,8 +1260,8 @@ optional argument WITH-CASE, the sorting considers case as well."
((member dcst '(?p ?t ?s ?d ?c)) '<)
(t nil)))
(begin-record (lambda ()
- (let ((next-p (org-get-next-item (point) (point-max))))
- (goto-char (or next-p (point-max))))))
+ (skip-chars-forward " \r\t\n")
+ (beginning-of-line)))
(end-record (lambda ()
(goto-char (org-end-of-item-before-blank))))
(value-to-sort (lambda nil