add a bunch of emacs packages HELP

1 files changed, 110 insertions, 0 deletions

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