Skip to content

Instantly share code, notes, and snippets.

@herbertjones
Created February 24, 2015 12:44
Show Gist options
  • Save herbertjones/94e3e1dd271831d5ea61 to your computer and use it in GitHub Desktop.
Save herbertjones/94e3e1dd271831d5ea61 to your computer and use it in GitHub Desktop.
Navagation mode idea
(evil-leader/set-key
"jn" 'spacemacs/navagation-micro-state)
(defun spacemacs//navagation-mode-ms-full-doc ()
"Full documentation for helm navigation micro-state."
"
[?] display this help
[)] [0] forwards sentence
[)] [9] backwards sentence
[}] [{] forwards/backwards paragraph
(]) ([) forwards/backwards section
[e] [y] scroll line down/up
[b] [.] page up
[f] [,] page down
[d] [u] forwards/backwards half page
[h] [l] left/right window
[j] [k] down/up window
[q] quit")
(spacemacs|define-micro-state navagation-mode
:doc "[?] help"
:bindings
("?" nil :doc (spacemacs//navagation-mode-ms-full-doc))
;; page up
("." evil-scroll-page-up)
("b" evil-scroll-page-up)
;; page down
("f" evil-scroll-page-down)
("," evil-scroll-page-down)
;; window navagation
("L" evil-window-right)
("H" evil-window-left)
("J" evil-window-down)
("K" evil-window-up)
;; char navagation
("l" evil-forward-char)
("h" evil-backward-char)
("j" evil-next-visual-line)
("k" evil-previous-visual-line)
;; scroll line navagation
("e" evil-scroll-line-down)
("y" evil-scroll-line-up)
;; half page
("u" evil-scroll-up)
("d" evil-scroll-down)
;; half page
("[" evil-backward-section-begin)
("]" evil-forward-section-begin)
("(" evil-backward-sentence-begin)
(")" evil-forward-sentence-begin)
("{" evil-backward-paragraph)
("}" evil-forward-paragraph)
("9" evil-backward-sentence-begin)
("0" evil-forward-sentence-begin)
("q" nil :exit t))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment