From d36e10b54574a97e3c4abdc5e4deeeaa9aff8b06 Mon Sep 17 00:00:00 2001 From: Jeremy Dormitzer Date: Fri, 15 Jan 2021 16:55:36 -0500 Subject: [PATCH] Fix elfeed keybindings --- emacs/.emacs.d/init.org | 73 +++++++++++++++++++++-------------------- 1 file changed, 37 insertions(+), 36 deletions(-) diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org index 550630b..25ae7f6 100755 --- a/emacs/.emacs.d/init.org +++ b/emacs/.emacs.d/init.org @@ -4514,45 +4514,13 @@ Elfeed is a feed reader for Emacs. (set (make-local-variable 'browse-url-browser-function) 'w3m-browse-url) (set (make-local-variable 'jdormit/w3m-referer) "https://www.google.com") - (general-def 'normal elfeed-search-mode-map "q" 'elfeed-search-quit-window) - (general-def 'normal elfeed-search-mode-map "C-r" 'elfeed-search-update--force) - (general-def 'normal elfeed-search-mode-map "R" 'elfeed-search-fetch) - (general-def 'normal elfeed-search-mode-map "RET" 'elfeed-search-show-entry) - (general-def 'normal elfeed-search-mode-map "s" 'elfeed-search-live-filter) - (general-def 'normal elfeed-search-mode-map "S" 'elfeed-search-set-filter) - (general-def 'normal elfeed-search-mode-map "B" 'elfeed-search-browse-url) - (general-def 'normal elfeed-search-mode-map "y" 'elfeed-search-yank) - (general-def 'normal elfeed-search-mode-map "u" 'elfeed-search-tag-all-unread) - (general-def 'normal elfeed-search-mode-map "r" 'elfeed-search-untag-all-unread) - (general-def 'normal elfeed-search-mode-map "n" 'next-line) - (general-def 'normal elfeed-search-mode-map "p" 'previous-line) - (general-def 'normal elfeed-search-mode-map "+" 'elfeed-search-tag-all) - (general-def 'normal elfeed-search-mode-map "-" 'elfeed-search-untag-all) - (general-def 'normal elfeed-show-mode-map "d" 'elfeed-show-save-enclosure) - (general-def 'normal elfeed-show-mode-map "q" 'elfeed-kill-buffer) - (general-def 'normal elfeed-show-mode-map "r" 'elfeed-show-refresh) - (general-def 'normal elfeed-show-mode-map "n" 'elfeed-show-next) - (general-def 'normal elfeed-show-mode-map "p" 'elfeed-show-prev) - (general-def 'normal elfeed-show-mode-map "s" 'elfeed-show-new-live-search) - (general-def 'normal elfeed-show-mode-map "B" 'elfeed-show-visit) - (general-def 'normal elfeed-show-mode-map "y" 'elfeed-show-yank) - (general-def 'normal elfeed-show-mode-map "u" (elfeed-expose #'elfeed-show-tag 'unread)) - (general-def 'normal elfeed-show-mode-map "+" 'elfeed-show-tag) - (general-def 'normal elfeed-show-mode-map "-" 'elfeed-show-untag) - (general-def 'normal elfeed-show-mode-map "SPC" 'scroll-up-command) - (general-def 'normal elfeed-show-mode-map "DEL" 'scroll-down-command) - (general-def 'normal elfeed-show-mode-map "\t" 'shr-next-link) - (general-def 'normal elfeed-show-mode-map [tab] 'shr-next-link) - (general-def 'normal elfeed-show-mode-map "\e\t" 'shr-previous-link) - (general-def 'normal elfeed-show-mode-map [backtab] 'shr-previous-link) - (general-def 'normal elfeed-show-mode-map [mouse-2] 'shr-browse-url) - (general-def 'normal elfeed-show-mode-map "A" 'elfeed-show-add-enclosure-to-playlist) - (general-def 'normal elfeed-show-mode-map "P" 'elfeed-show-play-enclosure)) + (smartparens-mode -1) + (evil-smartparens-mode -1)) (use-package elfeed :commands elfeed :config - (add-hook 'elfeed-show-mode-hook 'elfeed-setup-hook) + (add-hook 'elfeed-search-mode-hook 'elfeed-setup-hook) (setq-default elfeed-search-filter "@6-months-ago +unread") (add-to-list 'evil-normal-state-modes 'elfeed-search-mode) (add-to-list 'evil-normal-state-modes 'elfeed-show-mode) @@ -4590,7 +4558,40 @@ Elfeed is a feed reader for Emacs. ("https://kill-the-newsletter.com/feeds/31flkb42eg3v31yu7ecm.xml" news) ("https://joshwcomeau.com/rss.xml" web blog) ("https://victoria.dev/index.xml" blog)) - shr-use-colors nil)) + shr-use-colors nil) + :general + ('normal elfeed-search-mode-map "q" 'elfeed-search-quit-window) + ('normal elfeed-search-mode-map "C-r" 'elfeed-search-update--force) + ('normal elfeed-search-mode-map "R" 'elfeed-search-fetch) + ('normal elfeed-search-mode-map "RET" 'elfeed-search-show-entry) + ('normal elfeed-search-mode-map "s" 'elfeed-search-live-filter) + ('normal elfeed-search-mode-map "S" 'elfeed-search-set-filter) + ('normal elfeed-search-mode-map "B" 'elfeed-search-browse-url) + ('normal elfeed-search-mode-map "y" 'elfeed-search-yank) + ('normal elfeed-search-mode-map "u" 'elfeed-search-tag-all-unread) + ('normal elfeed-search-mode-map "r" 'elfeed-search-untag-all-unread) + ('normal elfeed-search-mode-map "n" 'next-line) + ('normal elfeed-search-mode-map "p" 'previous-line) + ('normal elfeed-search-mode-map "+" 'elfeed-search-tag-all) + ('normal elfeed-search-mode-map "-" 'elfeed-search-untag-all) + ('normal elfeed-show-mode-map "d" 'elfeed-show-save-enclosure) + ('normal elfeed-show-mode-map "q" 'elfeed-kill-buffer) + ('normal elfeed-show-mode-map "r" 'elfeed-show-refresh) + ('normal elfeed-show-mode-map "n" 'elfeed-show-next) + ('normal elfeed-show-mode-map "p" 'elfeed-show-prev) + ('normal elfeed-show-mode-map "s" 'elfeed-show-new-live-search) + ('normal elfeed-show-mode-map "B" 'elfeed-show-visit) + ('normal elfeed-show-mode-map "y" 'elfeed-show-yank) + ('normal elfeed-show-mode-map "u" (elfeed-expose #'elfeed-show-tag 'unread)) + ('normal elfeed-show-mode-map "+" 'elfeed-show-tag) + ('normal elfeed-show-mode-map "-" 'elfeed-show-untag) + ('normal elfeed-show-mode-map "\t" 'shr-next-link) + ('normal elfeed-show-mode-map [tab] 'shr-next-link) + ('normal elfeed-show-mode-map "\e\t" 'shr-previous-link) + ('normal elfeed-show-mode-map [backtab] 'shr-previous-link) + ('normal elfeed-show-mode-map [mouse-2] 'shr-browse-url) + ('normal elfeed-show-mode-map "A" 'elfeed-show-add-enclosure-to-playlist) + ('normal elfeed-show-mode-map "P" 'elfeed-show-play-enclosure)) #+END_SRC Keybinding for opening Elfeed: