Explorar o código

Fix bug with time sorting

Reported by Jrg Hagmann.
Carsten Dominik %!s(int64=16) %!d(string=hai) anos
pai
achega
3ca7add20a
Modificáronse 1 ficheiros con 1 adicións e 2 borrados
  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")))