0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-27 02:32:52 +00:00

Fix bug with time sorting

Reported by Jrg Hagmann.
This commit is contained in:
Carsten Dominik 2009-06-03 17:15:16 +02:00
parent 45d80c3a31
commit 3ca7add20a

View file

@ -6537,9 +6537,8 @@ WITH-CASE, the sorting considers case as well."
nil
(cond
((= dcst ?a) 'string<)
((= dcst ?t) 'time-less-p)
((= dcst ?f) compare-func)
((= dcst ?p) '<)
((member dcst '(?p ?t ?s ?d ?c)) '<)
(t nil)))))
(run-hooks 'org-after-sorting-entries-or-items-hook)
(message "Sorting entries...done")))