Tweak some evil keys

1 files changed, 13 insertions, 1 deletions

diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el
index 07933cd..566c43e 100644
--- a/emacs/.emacs.d/init.el
+++ b/emacs/.emacs.d/init.el
@@ -787,6 +787,16 @@ If no direction is given, don't split."
   (define-key yas-minor-mode-map [(tab)] nil)
   (define-key yas-minor-mode-map (kbd "C-\\") 'yas-expand))
 
+(defun oni:outline-toggle-entry ()
+  (interactive)
+  (if (outline-on-heading-p)
+      (if (eql (save-excursion
+                 (end-of-line)
+                 (outline-invisible-p))
+               'outline)
+          (outline-show-entry)
+        (outline-hide-entry))))
+
 (defun multiplication-table (number &optional upto)
   ""
   (interactive "nMultiplication table for: \nP")
@@ -1061,7 +1071,9 @@ from myaethon2.core.decorators import (
   (add-hook 'org-capture-mode-hook #'evil-insert-state)
   (require 'evil-nerd-commenter)
   (define-key evil-normal-state-map ",s" 'oni:evil-sort-lines-operator)
-  (add-hook 'before-save-hook #'oni:maybe-switch-to-normal-state))
+  (add-hook 'before-save-hook #'oni:maybe-switch-to-normal-state)
+  (evil-declare-key 'motion org-mode-map (kbd "RET") #'org-return)
+  (evil-declare-key 'normal outline-minor-mode-map (kbd "TAB") #'oni:outline-toggle-entry))
 
 (stante-after eww
   (setq eww-download-path               ; Don't go to ~/Downloads