[Org] Move hydra to ‘db-org’
This commit is contained in:
parent
23fe89a421
commit
4b55df875e
32
init.el
32
init.el
|
@ -455,37 +455,7 @@
|
|||
;; opening them manually
|
||||
(mapc #'find-file-noselect org-agenda-files)
|
||||
|
||||
(org-clock-persistence-insinuate)
|
||||
|
||||
(require 'hydra)
|
||||
|
||||
(defhydra hydra-org-clock (:color blue)
|
||||
"
|
||||
Current Task: %`org-clock-current-task; "
|
||||
("w" (lambda ()
|
||||
(interactive)
|
||||
(clock-in-task-by-id org-working-task-id)))
|
||||
("h" (lambda ()
|
||||
(interactive)
|
||||
(clock-in-task-by-id org-home-task-id)))
|
||||
("b" (lambda ()
|
||||
(interactive)
|
||||
(clock-in-task-by-id org-break-task-id)))
|
||||
("i" (lambda ()
|
||||
(interactive)
|
||||
(org-clock-in '(4))))
|
||||
("a" counsel-org-goto-all)
|
||||
("o" org-clock-out)
|
||||
("l" db/org-clock-in-last-task)
|
||||
("p" db/play-playlist)
|
||||
("d" (lambda ()
|
||||
(interactive)
|
||||
(when (org-clock-is-active)
|
||||
(save-window-excursion
|
||||
(org-clock-goto)
|
||||
(let ((org-inhibit-logging 'note))
|
||||
(org-todo 'done)
|
||||
(org-save-all-org-buffers)))))))))
|
||||
(org-clock-persistence-insinuate)))
|
||||
|
||||
(use-package org-ref
|
||||
:config (progn
|
||||
|
|
|
@ -857,6 +857,39 @@ Resulting org mode file will have CATEGORY and FILETAGS set."
|
|||
|
||||
(require 'ox-md)))
|
||||
|
||||
|
||||
;;; Hydra
|
||||
|
||||
(require 'hydra)
|
||||
|
||||
(defhydra hydra-org-clock (:color blue)
|
||||
"
|
||||
Current Task: %`org-clock-current-task; "
|
||||
("w" (lambda ()
|
||||
(interactive)
|
||||
(clock-in-task-by-id org-working-task-id)))
|
||||
("h" (lambda ()
|
||||
(interactive)
|
||||
(clock-in-task-by-id org-home-task-id)))
|
||||
("b" (lambda ()
|
||||
(interactive)
|
||||
(clock-in-task-by-id org-break-task-id)))
|
||||
("i" (lambda ()
|
||||
(interactive)
|
||||
(org-clock-in '(4))))
|
||||
("a" counsel-org-goto-all)
|
||||
("o" org-clock-out)
|
||||
("l" db/org-clock-in-last-task)
|
||||
("p" db/play-playlist)
|
||||
("d" (lambda ()
|
||||
(interactive)
|
||||
(when (org-clock-is-active)
|
||||
(save-window-excursion
|
||||
(org-clock-goto)
|
||||
(let ((org-inhibit-logging 'note))
|
||||
(org-todo 'done)
|
||||
(org-save-all-org-buffers)))))))
|
||||
|
||||
|
||||
;;; End
|
||||
|
||||
|
|
Loading…
Reference in New Issue