about summary refs log tree commit diff
path: root/src/gemma.lisp
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@gmail.com>2017-12-20T18·36+0100
committerVincent Ambo <tazjin@gmail.com>2017-12-20T19·15+0100
commitce036d7d15361ad4ad6630d0528473529d3df46a (patch)
tree54d1ef701f322e3fe8e727b65889cb06184a1ec9 /src/gemma.lisp
parent26f365271e00a87374f4b6cc3877e3896c1b1425 (diff)
fix(lisp): Sort tasks in DESCENDING order
Diffstat (limited to 'src/gemma.lisp')
-rw-r--r--src/gemma.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gemma.lisp b/src/gemma.lisp
index a96b722a2299..0aa873db459e 100644
--- a/src/gemma.lisp
+++ b/src/gemma.lisp
@@ -62,7 +62,7 @@ maximum interval."
 (defun sort-tasks (tasks)
   "Sorts TASKS in descending order by number of days remaining."
   (sort (copy-list tasks)
-        (lambda (t1 t2) (> (days-remaining t1)
+        (lambda (t1 t2) (< (days-remaining t1)
                            (days-remaining t2)))))
 
 (defun complete-task (name &optional at)