blob: 2dd00332449f18a70ff0ce51905f561a3ee795dc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
;;; evil-collection-hyrolo.el --- Bindings for `hyrolo' -*- lexical-binding: t -*-
;;; Commentary:
;;; Bindings for hyrolo.
;;; Code:
(require 'evil-collection)
(require 'hyperbole nil t)
(defvar hyrolo-mode-map)
(defconst evil-collection-hyrolo-maps '(hyrolo-mode-map))
(declare-function hyrolo-to-previous-loc "hyrolo")
(declare-function hyrolo-to-next-loc "hyrolo")
(declare-function hyrolo-overview "hyrolo")
(declare-function hyrolo-outline-show-all "hyrolo")
(defun evil-collection-hyrolo-setup ()
"Set up `evil' bindings for hyrolo."
(evil-collection-define-key 'normal 'hyrolo-mode-map
(kbd "[[") #'hyrolo-to-previous-loc
(kbd "]]") #'hyrolo-to-next-loc
(kbd "C-k") #'hyrolo-to-previous-loc
(kbd "C-j") #'hyrolo-to-next-loc
(kbd "gk") #'hyrolo-to-previous-loc
(kbd "gj") #'hyrolo-to-next-loc
(kbd "zo") #'hyrolo-outline-show-all
(kbd "zc") #'hyrolo-overview)
(evil-set-initial-state 'hyrolo-mode 'normal))
(provide 'evil-collection-hyrolo)
;;; evil-collection-hyrolo.el ends here
|
