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

[chronometrist] use --> for activity indicator

Browse Source
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 ***** activity-indicator
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp
(defun contrapunctus-chronometrist-activity-indicator () (defun contrapunctus-chronometrist-activity-indicator ()
(thread-last (plist-put (chronometrist-last) (--> (plist-put (chronometrist-last)
:stop (chronometrist-format-time-iso8601)) :stop (chronometrist-format-time-iso8601))
list (list it)
chronometrist-events-to-durations (chronometrist-events-to-durations it)
(-reduce #'+) (-reduce #'+ it)
truncate (truncate it)
chronometrist-format-duration)) (chronometrist-format-duration it)))
#+END_SRC #+END_SRC
***** find-two-files ***** find-two-files
#+BEGIN_SRC emacs-lisp #+BEGIN_SRC emacs-lisp