Browse Source

Fix bug with time sorting

Reported by Jrg Hagmann.
Carsten Dominik 16 years ago
parent
commit
3ca7add20a
1 changed files with 1 additions and 2 deletions
  1. 1 2
      lisp/org.el

+ 1 - 2
lisp/org.el

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