contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[chronometrist] use --> for activity indicator

This commit is contained in:
contrapunctus 2021-08-03 05:35:20 +05:30
parent b829d95293
commit 795527eff7
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
init.org
View File

@ -488,13 +488,13 @@ choice.el is required by =chronometrist-key-values=
***** activity-indicator
#+BEGIN_SRC emacs-lisp
(defun contrapunctus-chronometrist-activity-indicator ()
(thread-last (plist-put (chronometrist-last)
:stop (chronometrist-format-time-iso8601))
list
chronometrist-events-to-durations
(-reduce #'+)
truncate
chronometrist-format-duration))
(--> (plist-put (chronometrist-last)
:stop (chronometrist-format-time-iso8601))
(list it)
(chronometrist-events-to-durations it)
(-reduce #'+ it)
(truncate it)
(chronometrist-format-duration it)))
#+END_SRC
***** find-two-files
#+BEGIN_SRC emacs-lisp