ryuslash/emacs-config
1
0
Fork 0
Code Activity

Add a Hydra to Org configuration

Browse source
This commit is contained in:
Tom Willemse 2019-02-22 00:04:47 -08:00
parent c9f1c036bf
commit f1fc70ebcc
1 changed files with 14 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

16
oni-org.el
View file

@ -4,8 +4,8 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; Keywords: local
;; Version: 20190212005505 ;; Version: 20190222000538
;; Package-Requires: (org-plus-contrib org-bullets) ;; Package-Requires: (org-plus-contrib org-bullets hydra)
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by ;; it under the terms of the GNU General Public License as published by
@ -26,6 +26,7 @@
;;; Code: ;;; Code:
(require 'hydra)
(require 'org) (require 'org)
(require 'org-capture) (require 'org-capture)
(require 'org-habit) (require 'org-habit)
@ -81,6 +82,14 @@ ones that have a predecessor."
(oni-org-heading-has-predecessor-p)) (oni-org-heading-has-predecessor-p))
(oni-org-next-heading-position)))) (oni-org-next-heading-position))))
;;;###autoload(autoload 'oni-hydra-org/body "oni-org")
(defhydra oni-hydra-org (:color blue)
"Org"
("l" org-store-link "Store link")
("a" org-agenda "Agenda")
("c" org-capture "Capture")
("b" org-switchb "Switch to org buffer"))
(setq org-default-notes-file (setq org-default-notes-file
(oni-org-expand-to-home "documents/gtd/inbox.org")) (oni-org-expand-to-home "documents/gtd/inbox.org"))
(setq org-src-fontify-natively t) (setq org-src-fontify-natively t)
@ -133,5 +142,8 @@ ones that have a predecessor."
(add-hook 'org-mode-hook 'org-bullets-mode) (add-hook 'org-mode-hook 'org-bullets-mode)
(add-hook 'org-mode-hook #'oni-org-setup-prettify-symbols-mode)) (add-hook 'org-mode-hook #'oni-org-setup-prettify-symbols-mode))
;;;###autoload
(global-set-key (kbd "C-c o") 'oni-hydra-org/body)
(provide 'oni-org) (provide 'oni-org)
;;; oni-org.el ends here ;;; oni-org.el ends here