contrapunctus/chronometrist
Archived
1
3
Fork 0
Code Issues 1 Pull Requests Projects Releases Wiki Activity

-refresh - use better local variable names

Browse Source
This commit is contained in:
contrapunctus 2019-11-09 11:15:23 +05:30
parent ae82a05721
commit 7adae5b9ca
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
chronometrist.el
View File

@ -180,15 +180,15 @@ project. N must be a positive integer."
The optional arguments IGNORE-AUTO and NOCONFIRM are ignored, and
are present solely for the sake of using this function as a value
of `revert-buffer-function'."
(let* ((w (get-buffer-window chronometrist-buffer-name t))
(task (window-point w)))
(when w
(let* ((window (get-buffer-window chronometrist-buffer-name t))
(point (window-point window)))
(when window
(setq chronometrist-task-list (chronometrist-tasks-from-table))
(with-current-buffer chronometrist-buffer-name
(tabulated-list-print t nil)
(chronometrist-print-non-tabular)
(chronometrist-maybe-start-timer)
(set-window-point w task)))))
(set-window-point window point)))))
(defun chronometrist-refresh-file (fs-event)
"Re-read `chronometrist-file' and refresh the `chronometrist' buffer.