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/vlf/evil-collection-vlf.el | 86 ++++++++++++++++++++++ 1 file changed, 86 insertions(+) create mode 100644 .config/emacs/lisp/evil-collection/modes/vlf/evil-collection-vlf.el (limited to '.config/emacs/lisp/evil-collection/modes/vlf/evil-collection-vlf.el') diff --git a/.config/emacs/lisp/evil-collection/modes/vlf/evil-collection-vlf.el b/.config/emacs/lisp/evil-collection/modes/vlf/evil-collection-vlf.el new file mode 100644 index 0000000..b1482e2 --- /dev/null +++ b/.config/emacs/lisp/evil-collection/modes/vlf/evil-collection-vlf.el @@ -0,0 +1,86 @@ +;;; evil-collection-vlf.el --- Evil bindings for vlf -*- lexical-binding: t -*- + +;; Copyright (C) 2017 James Nguyen + +;; Author: James Nguyen +;; Maintainer: James Nguyen +;; Pierre Neidhardt +;; URL: https://github.com/emacs-evil/evil-collection +;; Version: 0.0.1 +;; Package-Requires: ((emacs "26.3")) +;; Keywords: evil, vlf, tools + +;; 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: +;; Evil bindings for `vlf'. + +;;; Code: +(require 'evil-collection) +(require 'vlf nil t) + +(defvar vlf-mode-map) +(declare-function vlf-change-batch-size "vlf") + +(defconst evil-collection-vlf-maps '(vlf-mode-map)) + +(define-obsolete-variable-alias 'evil-collection-vlf-want-g-bindings + 'evil-collection-want-g-bindings "0.0.11") + +(defun evil-collection-vlf-decrease-batch-size () + "Decrease vlf batch size by factor of 2." + (interactive) + (vlf-change-batch-size t)) + +;;; Code: +;;;###autoload +(defun evil-collection-vlf-setup () + "Set up `evil' bindings for `vlf'." + (evil-set-initial-state 'vlf-mode 'normal) + + (add-hook 'vlf-mode-hook #'evil-normalize-keymaps) + + (evil-collection-define-key 'normal 'vlf-prefix-map + "gj" 'vlf-next-batch + "gk" 'vlf-prev-batch + (kbd "C-j") 'vlf-next-batch + (kbd "C-k") 'vlf-prev-batch + "]]" 'vlf-next-batch + "[[" 'vlf-prev-batch + "+" 'vlf-change-batch-size + "-" 'evil-collection-vlf-decrease-batch-size + "=" 'vlf-next-batch-from-point + ;; refresh + "gr" 'vlf-revert + "g%" 'vlf-query-replace + "go" 'vlf-occur) + + (if evil-collection-want-g-bindings + (evil-collection-define-key 'normal 'vlf-prefix-map + "g/" 'vlf-re-search-forward + "g?" 'vlf-re-search-backward + "gJ" 'vlf-jump-to-chunk + "gE" 'vlf-ediff-buffers + "g:" 'vlf-goto-line + "gF" 'vlf-toggle-follow) + (evil-collection-define-key 'normal 'vlf-prefix-map + "s" 'vlf-re-search-forward + "S" 'vlf-re-search-backward + "J" 'vlf-jump-to-chunk + "E" 'vlf-ediff-buffers + "L" 'vlf-goto-line + "F" 'vlf-toggle-follow))) + +(provide 'evil-collection-vlf) +;;; evil-collection-vlf.el ends here -- cgit v1.2.3