emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/nano-agenda f44fb2c 2/2: Bug fix + shorter time display


From: ELPA Syncer
Subject: [elpa] externals/nano-agenda f44fb2c 2/2: Bug fix + shorter time display for today
Date: Wed, 13 Oct 2021 07:57:17 -0400 (EDT)

branch: externals/nano-agenda
commit f44fb2c4c73300e24d3041ebfc5aa8152f627c20
Author: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>
Commit: Nicolas P. Rougier <Nicolas.Rougier@inria.fr>

    Bug fix + shorter time display for today
---
 nano-agenda.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/nano-agenda.el b/nano-agenda.el
index 59ea8dc..4d4f3f3 100644
--- a/nano-agenda.el
+++ b/nano-agenda.el
@@ -365,7 +365,7 @@ for efficiency."
     (insert "\n")
     (insert (ts-format "*%A %-e %B %Y*" selected))
     (if is-today
-        (insert (format-time-string " /(current time is %H:%M)/")))
+        (insert (format-time-string " /(%H:%M)/")))
     (if (and (not is-today) holidays)
         (insert (format " /(%s)/" (nth 0 holidays))))
     (insert "\n\n")
@@ -484,7 +484,7 @@ for efficiency."
                                                      ""))
                                 'keymap map))
             (if (< col 6)
-                (insert (propertize (if is-today "•" " ") 'face face)))))
+                (insert (propertize (if is-today nano-agenda-today-symbol " ") 
'face face)))))
       (if (< row 5) (insert "\n")))))
 
 (provide 'nano-agenda)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]