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/elfeed/evil-collection-elfeed.el | 139 +++++++++++++++++++++ 1 file changed, 139 insertions(+) create mode 100644 .config/emacs/lisp/evil-collection/modes/elfeed/evil-collection-elfeed.el (limited to '.config/emacs/lisp/evil-collection/modes/elfeed/evil-collection-elfeed.el') diff --git a/.config/emacs/lisp/evil-collection/modes/elfeed/evil-collection-elfeed.el b/.config/emacs/lisp/evil-collection/modes/elfeed/evil-collection-elfeed.el new file mode 100644 index 0000000..c691575 --- /dev/null +++ b/.config/emacs/lisp/evil-collection/modes/elfeed/evil-collection-elfeed.el @@ -0,0 +1,139 @@ +;;; evil-collection-elfeed.el --- Evil bindings for elfeed -*- lexical-binding: t -*- + +;; Copyright (C) 2017 Pierre Neidhardt + +;; Author: Pierre Neidhardt +;; Maintainer: James Nguyen +;; Pierre Neidhardt +;; URL: https://github.com/emacs-evil/evil-collection +;; Version: 0.0.1 +;; Package-Requires: ((emacs "26.3")) +;; Keywords: evil, elfeed, 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 . + +;;; Commentary: +;; Evil bindings for elfeed. + +;;; Code: +(require 'elfeed nil t) +(require 'evil-collection) + +(defvar elfeed-search-mode-map) +(defvar elfeed-show-mode-map) +(defvar elfeed-tree-mode-map) + +(defconst evil-collection-elfeed-maps '(elfeed-search-mode-map + elfeed-show-mode-map + elfeed-tree-mode-map)) + +;;;###autoload +(defun evil-collection-elfeed-setup () + "Set up `evil' bindings for `elfeed'." + + (evil-collection-set-readonly-bindings 'elfeed-search-mode-map) + (evil-set-initial-state 'elfeed-search-mode 'normal) + (evil-collection-define-key 'normal 'elfeed-search-mode-map + ;; open + (kbd "RET") 'elfeed-search-show-entry + (kbd "S-") 'elfeed-search-browse-url + "go" 'elfeed-search-browse-url + + "y" 'elfeed-search-yank + + (kbd "SPC") 'scroll-up-command + (kbd "S-SPC") 'scroll-down-command + + ;; filter + "s" 'elfeed-search-live-filter + "S" 'elfeed-search-set-filter + "c" 'elfeed-search-clear-filter + + ;; refresh + "gR" 'elfeed-search-fetch ; TODO: Which update function is more useful? + "gr" 'revert-buffer + + ;; quit -- `q'/`ZZ' default to `quit-window' via + ;; `evil-collection-set-readonly-bindings'. + "ZQ" 'quit-window) + + ;; Refresh fallback for elfeed before commit 518e5bd3, where + ;; `revert-buffer-function' is not wired up. + (unless (fboundp 'elfeed-search--update-force) + (evil-collection-define-key 'normal 'elfeed-search-mode-map + "gr" 'elfeed-search-update--force)) + + ;; Quit fallback for elfeed before commit 2ef14c92, where + ;; `quit-window-hook' does not run `elfeed-db-save'. + (when (and (fboundp 'elfeed-search-quit-window) + (not (eq (indirect-function 'elfeed-search-quit-window) + (symbol-function 'quit-window)))) + (evil-collection-define-key 'normal 'elfeed-search-mode-map + "q" 'elfeed-search-quit-window + "ZQ" 'elfeed-search-quit-window + "ZZ" 'elfeed-search-quit-window)) + + (evil-collection-define-key '(normal visual) 'elfeed-search-mode-map + "+" 'elfeed-search-tag-all + "-" 'elfeed-search-untag-all + "U" 'elfeed-search-tag-all-unread + "u" 'elfeed-search-untag-all-unread) + + (evil-collection-set-readonly-bindings 'elfeed-show-mode-map) + (evil-set-initial-state 'elfeed-show-mode 'normal) + (evil-collection-define-key 'normal 'elfeed-show-mode-map + (kbd "S-") 'elfeed-show-visit + "go" 'elfeed-show-visit + + (kbd "SPC") 'scroll-up-command + (kbd "S-SPC") 'scroll-down-command + (kbd "") 'elfeed-show-next-link + + ;; filter + "s" 'elfeed-show-new-live-search + + "+" 'elfeed-show-tag + "-" 'elfeed-show-untag + + "A" 'elfeed-show-add-enclosure-to-playlist + "P" 'elfeed-show-play-enclosure + "d" 'elfeed-show-save-enclosure + + "]]" 'elfeed-show-next + "[[" 'elfeed-show-prev + "gj" 'elfeed-show-next + "gk" 'elfeed-show-prev + (kbd "C-j") 'elfeed-show-next + (kbd "C-k") 'elfeed-show-prev + + ;; refresh + "gr" 'elfeed-show-refresh + + ;; quit + "q" 'elfeed-kill-buffer + "ZQ" 'elfeed-kill-buffer + "ZZ" 'elfeed-kill-buffer) + + ;; yu, like `eww' + (evil-collection-define-operator-key 'yank 'elfeed-show-mode-map + "u" 'elfeed-show-yank) + + (evil-collection-set-readonly-bindings 'elfeed-tree-mode-map) + (evil-set-initial-state 'elfeed-tree-mode 'normal) + (evil-collection-define-key 'normal 'elfeed-tree-mode-map + ;; open + (kbd "RET") 'elfeed-tree-search)) + +(provide 'evil-collection-elfeed) +;;; evil-collection-elfeed.el ends here -- cgit v1.2.3