From bdf9a71ab7baa2b1de9abcfd5df1a9107a55d141 Mon Sep 17 00:00:00 2001 From: Jack Jamison Date: Sun, 5 Jul 2026 01:19:30 -0400 Subject: add a bunch of emacs packages HELP --- .../modes/vundo/evil-collection-vundo.el | 93 ++++++++++++++++++++++ 1 file changed, 93 insertions(+) create mode 100644 .config/emacs/lisp/evil-collection/modes/vundo/evil-collection-vundo.el (limited to '.config/emacs/lisp/evil-collection/modes/vundo/evil-collection-vundo.el') diff --git a/.config/emacs/lisp/evil-collection/modes/vundo/evil-collection-vundo.el b/.config/emacs/lisp/evil-collection/modes/vundo/evil-collection-vundo.el new file mode 100644 index 0000000..e02c110 --- /dev/null +++ b/.config/emacs/lisp/evil-collection/modes/vundo/evil-collection-vundo.el @@ -0,0 +1,93 @@ +;;; evil-collection-vundo.el --- Bindings for `vundo-mode' -*- lexical-binding: t -*- + +;; Copyright (C) 2022 James Nguyen + +;; Author: James Nguyen +;; Maintainer: James Nguyen +;; URL: https://github.com/emacs-evil/evil-collection +;; Version: 0.0.1 +;; Package-Requires: ((emacs "27.1")) +;; Keywords: evil, vundo, convenience + +;; This program 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 of the License, or +;; (at your option) any later version. + +;; This program 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. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . + +;;; Commentary: +;;; Bindings for `vundo-mode'. + +;;; Code: +(require 'vundo nil t) +(require 'evil-collection) + +(defgroup evil-collection-vundo nil + "Evil bindings for `vundo-mode'." + :group 'evil-collection) + +(defvar vundo-mode-map) + +(defconst evil-collection-vundo-maps '(vundo-mode-map)) + +(defun evil-collection-vundo--hide-evil-cursor () + "Hide the evil cursor." + (setq-local evil-default-cursor '(nil)) + (setq-local evil-motion-state-cursor nil) + (setq-local evil-visual-state-cursor nil) + (setq-local evil-normal-state-cursor nil) + (setq-local evil-insert-state-cursor nil) + (setq-local evil-emacs-state-cursor nil)) + +(defun evil-collection-vundo--disable-hl-line-mode () + "Disable `hl-line-mode'." + (setq-local global-hl-line-mode nil)) + +;;;###autoload +(defun evil-collection-vundo-setup () + "Set up `evil' bindings for `vundo'." + (add-hook 'vundo-mode-hook #'evil-normalize-keymaps) + ;; `vundo' defaults to emacs state. + (add-hook 'vundo-mode-hook #'evil-normal-state) + ;; hide evil cursor + (add-hook 'vundo-mode-hook #'evil-collection-vundo--hide-evil-cursor) + ;; disable hl-line-mode + (add-hook 'vundo-mode-hook #'evil-collection-vundo--disable-hl-line-mode) + + (evil-collection-define-key 'normal 'vundo-mode-map + [remap evil-backward-char] 'vundo-backward + [remap evil-forward-char] 'vundo-forward + [remap evil-next-line] 'vundo-next + [remap evil-previous-line] 'vundo-previous + [remap evil-window-top] 'vundo-stem-root + [remap evil-window-bottom] 'vundo-stem-end + [remap evil-ret] 'vundo-confirm + [remap evil-quit] 'vundo-quit + [remap evil-save-and-close] 'vundo-confirm + [remap evil-save-modified-and-close] 'vundo-confirm + [remap evil-delete-backward-char] 'vundo-backward + (kbd "C-n") 'vundo-next + (kbd "C-p") 'vundo-previous + (kbd "C-j") 'vundo-next + (kbd "C-k") 'vundo-previous + (kbd "M-j") 'vundo-next + (kbd "M-k") 'vundo-previous + "i" 'vundo--inspect + "D" 'vundo--debug + "d" 'vundo-diff + "m" 'vundo-diff-mark + "u" 'vundo-diff-unmark + "w" 'vundo-next-root + "q" 'vundo-quit + "ZZ" 'vundo-quit + "ZQ" 'vundo-quit)) + +(provide 'evil-collection-vundo) +;;; evil-collection-vundo.el ends here -- cgit v1.2.3