Sort messages by date. Fixes #4

2018-06-26 11:49:22 +03:00 · 2018-06-26 11:49:22 +03:00 · feb4da9f86
parent 9f5850bbb9
commit feb4da9f86
1 changed files with 2 additions and 1 deletions
--- a/idec-db.el
+++ b/idec-db.el
@ -172,7 +172,8 @@ unread by default, but you can MARK-READ it."
        (dolist (l (emacsql (open-echo-db echo)
                           [:select [id, tags, author, address, recipient, repto, echo, subj, body, time, unread]
                                    :from messages
-                                    :order-by time]))
+                                    :order-by DATE\(time\)
+                                    :desc]))
            (if (> (length l) 0)
                    (setq msgs (append msgs (make-list 1 (make-hash-from-msg-list l))))))
        msgs))