Some elfeed commands can operate on a number of entries, based on the active selection. When selecting entries with evil (visual state), the bindings for these commands are shadowed by visual state bindings, and can't be accessed. To fix this, the affected elfeed bindings are explicitly defined for visual state.
74 lines
2.2 KiB
EmacsLisp
74 lines
2.2 KiB
EmacsLisp
;;; packages.el --- elfeed Layer packages File for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2017 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
(setq elfeed-packages
|
|
'(elfeed
|
|
elfeed-goodies
|
|
elfeed-org
|
|
elfeed-web
|
|
))
|
|
|
|
(defun elfeed/init-elfeed ()
|
|
(use-package elfeed
|
|
:defer t
|
|
:init (spacemacs/set-leader-keys "af" 'elfeed)
|
|
:config
|
|
(progn
|
|
(evilified-state-evilify-map elfeed-search-mode-map
|
|
:mode elfeed-search-mode
|
|
:eval-after-load elfeed-search
|
|
:bindings
|
|
"c" 'elfeed-db-compact
|
|
"gr" 'elfeed-update
|
|
"gR" 'elfeed-search-update--force
|
|
"gu" 'elfeed-unjam
|
|
"o" 'elfeed-load-opml
|
|
"q" 'quit-window
|
|
"w" 'elfeed-web-start
|
|
"W" 'elfeed-web-stop)
|
|
(evilified-state-evilify-map elfeed-show-mode-map
|
|
:mode elfeed-show-mode
|
|
:eval-after-load elfeed-show
|
|
:bindings
|
|
"q" 'quit-window
|
|
(kbd "C-j") 'elfeed-show-next
|
|
(kbd "C-k") 'elfeed-show-prev)
|
|
(evil-define-key 'visual elfeed-search-mode-map
|
|
"+" 'elfeed-search-tag-all
|
|
"-" 'elfeed-search-untag-all
|
|
"b" 'elfeed-search-browse-url
|
|
"y" 'elfeed-search-yank))))
|
|
|
|
(defun elfeed/init-elfeed-goodies ()
|
|
(use-package elfeed-goodies
|
|
:commands elfeed-goodies/setup
|
|
:init (spacemacs|use-package-add-hook elfeed
|
|
:post-config (progn
|
|
(elfeed-goodies/setup)
|
|
(evil-define-key 'evilified elfeed-show-mode-map "o" 'elfeed-goodies/show-ace-link)))))
|
|
|
|
(defun elfeed/init-elfeed-org ()
|
|
(use-package elfeed-org
|
|
:defer t
|
|
:if (boundp 'rmh-elfeed-org-files)
|
|
:init (spacemacs|use-package-add-hook elfeed
|
|
:pre-config (elfeed-org))))
|
|
|
|
(defun elfeed/init-elfeed-web ()
|
|
(use-package elfeed-web
|
|
:defer t
|
|
:commands elfeed-web-stop
|
|
:init (when elfeed-enable-web-interface
|
|
;; TODO check if the port is already in use
|
|
;; hack to force elfeed feature to be required before elfeed-search
|
|
(require 'elfeed)
|
|
(elfeed-web-start))))
|