Compare commits
4 Commits
eae1590e68
...
bfcca623dc
Author | SHA1 | Date |
---|---|---|
Daniel - | bfcca623dc | |
Daniel - | 78b202aed7 | |
Daniel - | 77920dd9a2 | |
Daniel - | afb06fca59 |
7
init.el
7
init.el
|
@ -175,15 +175,13 @@
|
||||||
(bind-key "<XF86Back>" #'winner-undo)
|
(bind-key "<XF86Back>" #'winner-undo)
|
||||||
(bind-key "<XF86Forward>" #'winner-redo)
|
(bind-key "<XF86Forward>" #'winner-redo)
|
||||||
(bind-key "<f10>" #'magit-status)
|
(bind-key "<f10>" #'magit-status)
|
||||||
(bind-key "<f11>" #'db/org-find-links-to-current-item)
|
|
||||||
(bind-key "<f12>" #'db/helm-shortcuts)
|
|
||||||
(bind-key "<f1>" #'db/run-or-hide-eshell)
|
(bind-key "<f1>" #'db/run-or-hide-eshell)
|
||||||
(bind-key "<f2>" #'hydra-feature-shortcuts/body)
|
(bind-key "<f2>" #'hydra-feature-shortcuts/body)
|
||||||
(bind-key "<f5>" (if (executable-find "ag") #'counsel-ag #'rgrep))
|
(bind-key "<f5>" (if (executable-find "ag") #'counsel-ag #'rgrep))
|
||||||
(bind-key "<f6>" #'hydra-zoom/body)
|
(bind-key "<f6>" #'hydra-zoom/body)
|
||||||
(bind-key "<f7>" #'dictcc)
|
(bind-key "<f7>" #'dictcc)
|
||||||
(bind-key "<f8>" #'bm-toggle)
|
(bind-key "<f8>" #'bm-toggle)
|
||||||
(bind-key "<f9>" #'db/org-add-link-to-other-item)
|
(bind-key "<f9>" #'hydra-org-linking/body)
|
||||||
(bind-key "<C-f8>" #'bm-next)
|
(bind-key "<C-f8>" #'bm-next)
|
||||||
(bind-key "<C-S-f8>" #'bm-previous)
|
(bind-key "<C-S-f8>" #'bm-previous)
|
||||||
(bind-key "C-," #'mc/skip-to-previous-like-this)
|
(bind-key "C-," #'mc/skip-to-previous-like-this)
|
||||||
|
@ -733,7 +731,8 @@
|
||||||
db/org-copy-template-for-periodic-task
|
db/org-copy-template-for-periodic-task
|
||||||
db/org-find-links-to-current-item
|
db/org-find-links-to-current-item
|
||||||
db/org-add-link-to-other-item
|
db/org-add-link-to-other-item
|
||||||
db/org-add-link-to-current-clock))
|
db/org-add-link-to-current-clock
|
||||||
|
hydra-org-linking/body))
|
||||||
|
|
||||||
(use-package org
|
(use-package org
|
||||||
:pin "gnu"
|
:pin "gnu"
|
||||||
|
|
|
@ -80,4 +80,4 @@ the hydra will be generated. See documentation of
|
||||||
(db/define-feature-shortcuts-hydra)
|
(db/define-feature-shortcuts-hydra)
|
||||||
|
|
||||||
(provide 'db-hydras)
|
(provide 'db-hydras)
|
||||||
;; db-hydras.el ends here
|
;;; db-hydras.el ends here
|
||||||
|
|
|
@ -729,9 +729,19 @@ in an Org Mode buffer or when the clock is not active."
|
||||||
(user-error "No clocked-in task, aborting"))
|
(user-error "No clocked-in task, aborting"))
|
||||||
(save-mark-and-excursion
|
(save-mark-and-excursion
|
||||||
(org-with-point-at org-clock-marker
|
(org-with-point-at org-clock-marker
|
||||||
(org-store-link nil t))
|
(org-store-link nil t)))
|
||||||
(pcase-let ((`(,location ,description) (cl-first org-stored-links)))
|
(pcase-let ((`(,location ,description) (cl-first org-stored-links)))
|
||||||
(org-insert-link nil location description))))
|
(org-insert-link nil location description)))
|
||||||
|
|
||||||
|
(defhydra hydra-org-linking (:color blue :hint none)
|
||||||
|
"\nLinking between Org mode items.
|
||||||
|
_c_urrent clock _o_ther item (current buffer or default Org file)
|
||||||
|
_b_acklinks to current item _O_ther item (all text files)
|
||||||
|
"
|
||||||
|
("c" (db/org-add-link-to-current-clock))
|
||||||
|
("o" (db/org-add-link-to-other-item nil))
|
||||||
|
("O" (db/org-add-link-to-other-item t))
|
||||||
|
("b" db/org-find-links-to-current-item))
|
||||||
|
|
||||||
|
|
||||||
;;; End
|
;;; End
|
||||||
|
|
Loading…
Reference in New Issue