summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <n.goaziou@gmail.com>2011-05-07 02:17:19 +0200
committerNicolas Goaziou <n.goaziou@gmail.com>2011-05-07 02:17:19 +0200
commit073ab7de833a9198f18d745d4a79a8122d94c154 (patch)
tree244ab0e08ccdd74422a8ac7758005f8ef4835f10
parente80305e77e039503133f8efe4aee09f5445010d2 (diff)
downloadorg-mode-073ab7de833a9198f18d745d4a79a8122d94c154.tar.gz
org-list: check with-case argument when sorting a list alphabetically
* lisp/org-list.el (org-sort-list): no longer ignore with-case argument: the function sorted case-sensitively, regardless of argument.
-rw-r--r--lisp/org-list.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org-list.el b/lisp/org-list.el
index 9c178e1..30d0ca9 100644
--- a/lisp/org-list.el
+++ b/lisp/org-list.el
@@ -2586,7 +2586,8 @@ compare entries."
(string-to-number (buffer-substring (match-end 0)
(point-at-eol))))
((= dcst ?a)
- (buffer-substring (match-end 0) (point-at-eol)))
+ (funcall case-func
+ (buffer-substring (match-end 0) (point-at-eol))))
((= dcst ?t)
(cond
;; If it is a timer list, convert timer to seconds