Update.

[elisp.git] / enotes.el

diff --git a/enotes.el b/enotes.el
index 63c4431..48c4ed3 100644 (file)
--- a/enotes.el
+++ b/enotes.el
@@ -455,7 +455,7 @@ heuristic. Improvements are welcome"
          (format "in %dmin" (/ second 60)))
         ((< second enotes/day-duration)
          (format "in %dh" (/ second 3600)))
-        ((< second enotes/month-duration)
+        ((< second (* 3 enotes/month-duration))
          (format "in %d day%s" (/ second 86400)
                  (if (> (ftruncate (/ second 86400)) 1)
                      "s" "")))
@@ -480,10 +480,12 @@ heuristic. Improvements are welcome"
      ;; The small color tag
 
      (if (enotes/get-color note)
-         (propertize " " 'face (cons 'background-color
-                                     (enotes/get-color note)))
+         (propertize " "
+                     'face (cons 'background-color (enotes/get-color note)))
        " ")
 
+     (if (equal (enotes/get-event-time note) (enotes/get-warning-time note)) "+" " ")
+
      " ")
 
     'field 'title)