emacs
/
evil-collection
mirror of https://github.com/jojojames/evil-collection.git
1
0
Fork 0
Code Issues Releases Wiki Activity

outline: Optionally enable keybindings in Outline minor mode

This commit is contained in:
Jacob First 2020-12-20 14:21:08 -05:00 committed by Pierre Neidhardt
parent ac18f6cd44
commit 63a9dcb3ef
1 changed files with 19 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
modes/outline/evil-collection-outline.el
View File

@ -40,6 +40,18 @@ mode."
:group 'evil-collection-outline
:type 'boolean)
(defcustom evil-collection-outline-enable-in-minor-mode-p t
"Enable Outline mode bindings in Outline minor mode.
To override individual bindings, modify the minor mode keymap.
For example, \"zB\" is bound to `outline-hide-body' in Outline
mode. To turn off this specific binding in Outline minor mode,
you can do:
(evil-define-minor-mode-key 'normal 'outline-minor-mode \"zB\" nil)"
:group 'evil-collection-outline
:type 'boolean)
(defconst evil-collection-outline-maps '(outline-mode-map))
;;;###autoload
@ -92,7 +104,13 @@ mode."
(kbd "M-k") 'outline-move-subtree-up ; Org-mode has "M-<up>", Evil-org has "M-k"
(kbd "M-l") 'outline-demote ; Org-mode has "M-<right>", Evil-org has "M-l"
(kbd "M-<return>") 'outline-insert-heading)) ; Org-mode has "M-<return>"
(kbd "M-<return>") 'outline-insert-heading) ; Org-mode has "M-<return>"
;; Enable bindings in Outline minor mode if requested
(when evil-collection-outline-enable-in-minor-mode-p
(let* ((minor-map (evil-get-minor-mode-keymap 'normal 'outline-minor-mode))
(major-map (evil-get-auxiliary-keymap outline-mode-map 'normal)))
(set-keymap-parent minor-map major-map))))
(provide 'evil-collection-outline)
;;; evil-collection-outline.el ends here