diff options
author | Raul Benencia <rul@kalgan.cc> | 2021-04-22 19:18:07 -0700 |
---|---|---|
committer | Raul Benencia <rul@kalgan.cc> | 2021-04-22 19:18:07 -0700 |
commit | dc68d5e2b886e7308430e692b8f5d4e6777269f5 (patch) | |
tree | 91ffea9623c9a72de839b482ebdbd700fa3f5283 /.emacs.local.d/modes/org-pomodoro.el | |
parent | eca0355dce1439af91e8249c0d962707bef691f6 (diff) |
emacs: clean org-pomodoro
Diffstat (limited to '.emacs.local.d/modes/org-pomodoro.el')
-rw-r--r-- | .emacs.local.d/modes/org-pomodoro.el | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/.emacs.local.d/modes/org-pomodoro.el b/.emacs.local.d/modes/org-pomodoro.el deleted file mode 100644 index e8df41f..0000000 --- a/.emacs.local.d/modes/org-pomodoro.el +++ /dev/null @@ -1,34 +0,0 @@ -;; Elpa packages: org-pomodoro - -(use-package org-pomodoro - :ensure t - :commands (org-pomodoro) - :hook - (org-pomodoro-started . (lambda () (notifications-notify - :title "Pomodoro" - :body "Let's focus for 25 minutes!" - :app-icon "~/.emacs.d/img/001-food-and-restaurant.png"))) - (org-pomodoro-finished . (lambda () (notifications-notify - :title "Pomodoro" - :body "Well done! Take a break." - :app-icon "~/.emacs.d/img/004-beer.png"))) - :config - (setq org-pomodoro-length 25) - (setq org-pomodoro-short-break-length 5) - (setq org-pomodoro-long-break-length 15) - (setq org-pomodoro-play-sounds nil)) - -(defun my/org-pomodoro-text-time () - "Return status info about org-pomodoro and if org-pomodoro is not running, try to print info about org-clock. - If either org-pomodoro or org-clock aren't active, print \"No Active Task \" " - (interactive) - (cond ((equal :none org-pomodoro-state) - (if (org-clock-is-active) - (format "Clocked task: %d minutes - %s" - (org-clock-get-clocked-time) (substring-no-properties org-clock-heading)) - "No Active task")) - ((equal :pomodoro org-pomodoro-state) - (format "%d - Pomodoro: %d minutes - %s" - org-pomodoro-count (/ (org-pomodoro-remaining-seconds) 60) (substring-no-properties org-clock-heading))) - ((equal :short-break org-pomodoro-state) "Short Break") - ((equal :long-break org-pomodoro-state) "Long Break"))) |