diff options
Diffstat (limited to '.config/emacs/lisp/evil-collection/modes/info')
| -rw-r--r-- | .config/emacs/lisp/evil-collection/modes/info/README.org | 40 | ||||
| -rw-r--r-- | .config/emacs/lisp/evil-collection/modes/info/evil-collection-info.el | 110 |
2 files changed, 150 insertions, 0 deletions
diff --git a/.config/emacs/lisp/evil-collection/modes/info/README.org b/.config/emacs/lisp/evil-collection/modes/info/README.org new file mode 100644 index 0000000..f8d168b --- /dev/null +++ b/.config/emacs/lisp/evil-collection/modes/info/README.org @@ -0,0 +1,40 @@ +* info + + Evil bindings for [[https://www.gnu.org/software/emacs/manual/html_node/info/index.html][Info]]. + + Uses normal state instead of motion state and rebinds movement to standard + evil keys. + +** Key bindings + + | Command | Original | Evil | + |----------------------------------------------+----------------+----------------------| + | =Info-next-reference= | =TAB= | =TAB=, =g TAB=, =g]= | + | =Info-prev-reference= | =S-TAB= | =S-TAB=, =g[= | + | =Info-help= | =h= | =M-h= | + | =Info-history-back= | =l= | =C-t=, =C-o= | + | =Info-history-forward= | =r= | =C-i= | + | =Info-scroll-up= | =SPC= | =SPC= | + | =Info-scroll-down= | =DEL=, =S-SPC= | =DEL= | + | =Info-follow-nearest-node= | =RET= | =RET=, =C-]= | + | =Info-directory= | =d= | =d= | + | =Info-up= | =^=, =u= | =u= | + | =Info-history= | =L= | =gL= | + | =Info-search= | =s= | =s= | + | =Info-search-case-sensitively= | =S= | =S= | + | =Info-index= | =i= | =i= | + | =Info-virtual-index= | =I= | =I= | + | =info-apropos= | n/a | =a= | + | =Info-nth-menu-item= | =1..9= | =g1..g9= | + | =Info-menu= | =m= | =J=, =gm= | + | =Info-goto-node= | =g= | =gG= | + | =Info-top-node= | =t=, =<= | =gt= | + | =Info-toc= | =T= | =gT= | + | =Info-follow-reference= | =f= | =gf= | + | =Info-forward-node= | =]= | =C-j= | + | =Info-backward-node= | =[= | =C-k= | + | =Info-next= | =n= | =gj= | + | =Info-prev= | =p= | =gk= | + | =Info-index-next= | =,= | =g,= | + | =Info-summary= | =?= | =g?= | + | =Info-copy-current-node-name= (=y= operator) | =c=, =w= | =yu= | diff --git a/.config/emacs/lisp/evil-collection/modes/info/evil-collection-info.el b/.config/emacs/lisp/evil-collection/modes/info/evil-collection-info.el new file mode 100644 index 0000000..5f4332e --- /dev/null +++ b/.config/emacs/lisp/evil-collection/modes/info/evil-collection-info.el @@ -0,0 +1,110 @@ +;;; evil-collection-info.el --- Evil bindings for Info-mode -*- lexical-binding: t -*- + +;; Copyright (C) 2017 Pierre Neidhardt + +;; Author: Pierre Neidhardt <mail@ambrevar.xyz> +;; Maintainer: James Nguyen <james@jojojames.com> +;; Pierre Neidhardt <mail@ambrevar.xyz> +;; URL: https://github.com/emacs-evil/evil-collection +;; Version: 0.0.1 +;; Package-Requires: ((emacs "26.3")) +;; Keywords: evil, info, tools + +;; This file is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published +;; by the Free Software Foundation; either version 3, or (at your +;; option) any later version. +;; +;; This file is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; For a full copy of the GNU General Public License +;; see <http://www.gnu.org/licenses/>. + +;;; Commentary: +;; The default bindings in motion state override the standard movement keys. +;; This package uses normal state and redefines everything. + +;;; Code: +(require 'evil-collection) +(require 'info) + +(defconst evil-collection-info-maps '(Info-mode-map)) + +;;;###autoload +(defun evil-collection-info-setup () + "Set up `evil' bindings for `info-mode'." + (evil-collection-set-readonly-bindings 'Info-mode-map) + (evil-set-initial-state 'Info-mode 'normal) + (evil-collection-define-key 'normal 'Info-mode-map + (kbd "<tab>") 'Info-next-reference + (kbd "S-<tab>") 'Info-prev-reference + ;; This exists because <tab> is recognized as C-i on terminals. + (kbd "g TAB") 'Info-next-reference + "g]" 'Info-next-reference + "g[" 'Info-prev-reference + + ;; From evil-integration.el. + (kbd "M-h") 'Info-help ; "h" + (kbd "C-t") 'Info-history-back ; "l" + (kbd "C-o") 'Info-history-back + " " 'Info-scroll-up + (kbd "RET") 'Info-follow-nearest-node + (kbd "C-]") 'Info-follow-nearest-node + (kbd "DEL") 'Info-scroll-down + (kbd "C-i") 'Info-history-forward + + "d" 'Info-directory + "u" 'Info-up + "gL" 'Info-history ; "L" + "s" 'Info-search + "S" 'Info-search-case-sensitively + "i" 'Info-index + "I" 'Info-virtual-index + "a" 'info-apropos + + ;; mouse integration + [mouse-2] 'Info-mouse-follow-nearest-node + [follow-link] 'mouse-face + ;; make mac user happy + [double-wheel-left] 'Info-history-back + [double-wheel-right] 'Info-history-forward + + ;; digit arguments + "g1" 'Info-nth-menu-item + "g2" 'Info-nth-menu-item + "g3" 'Info-nth-menu-item + "g4" 'Info-nth-menu-item + "g5" 'Info-nth-menu-item + "g6" 'Info-nth-menu-item + "g7" 'Info-nth-menu-item + "g8" 'Info-nth-menu-item + "g9" 'Info-nth-menu-item + + ;; goto + "J" 'Info-menu + + "gG" 'Info-goto-node + "gm" 'Info-menu + "gt" 'Info-top-node + "gT" 'Info-toc + "gf" 'Info-follow-reference + ;; TODO: "[" and "]" are Emacs default for fine-grained browsing. + ;; We usually use "C-j"/"C-k" for that. + (kbd "C-j") 'Info-forward-node + (kbd "C-k") 'Info-backward-node + "gj" 'Info-next + "gk" 'Info-prev + + "g," 'Info-index-next + + "g?" 'Info-summary) + + ;; yu, Like eww. + (evil-collection-define-operator-key 'yank 'Info-mode-map + "u" 'Info-copy-current-node-name)) + +(provide 'evil-collection-info) +;;; evil-collection-info.el ends here |