From dc68d5e2b886e7308430e692b8f5d4e6777269f5 Mon Sep 17 00:00:00 2001 From: Raul Benencia Date: Thu, 22 Apr 2021 19:18:07 -0700 Subject: emacs: clean org-pomodoro --- .emacs.local.d/modes/org-pomodoro.el | 34 ---------------------------------- 1 file changed, 34 deletions(-) delete mode 100644 .emacs.local.d/modes/org-pomodoro.el (limited to '.emacs.local.d/modes') 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"))) -- cgit v1.2.3