hiro/pomm.el
1
0
Fork 0
mirror of https://github.com/vale981/pomm.el synced 2025-03-05 09:41:42 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: remove unnecessary function

Browse source
This commit is contained in:
SqrtMinusOne 2022-08-14 18:39:58 +05:00
parent 2dad0ced49
commit 0942131ac3
1 changed files with 1 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
pomm-third-time.el
View file

@ -375,14 +375,10 @@ Take a look at the `pomm-third-time' function for more details."
(unless pomm-third-time--timer (unless pomm-third-time--timer
(setq pomm-third-time--timer (run-with-timer 0 1 'pomm-third-time--on-tick)))) (setq pomm-third-time--timer (run-with-timer 0 1 'pomm-third-time--on-tick))))
(defun pomm-third-time--running-p ()
"Check if the timer is running."
(eq (alist-get 'status pomm-third-time--state) 'running))
(defun pomm-third-time--stop () (defun pomm-third-time--stop ()
"Stop the running Third Time timer." "Stop the running Third Time timer."
(interactive) (interactive)
(unless (pomm-third-time--can-stop-p) (unless (eq (alist-get 'status pomm-third-time--state) 'running)
(user-error "The timer is not running!")) (user-error "The timer is not running!"))
(pomm-third-time--store-current-to-history) (pomm-third-time--store-current-to-history)
(setf (alist-get 'status pomm-third-time--state) 'stopped (setf (alist-get 'status pomm-third-time--state) 'stopped