From 0b1230e97cbd0e785d7b0536c20e1094a4ab4704 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Tue, 4 Jan 2022 17:26:37 -0600
Subject: Add hl-line-mode to elfeed-search-mode

---
 init.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index aa195f5..06f92ba 100644
--- a/init.el
+++ b/init.el
@@ -859,15 +859,17 @@ See also `crux-reopen-as-root-mode'."
    elfeed-search-title-max-width 78
    elfeed-show-unique-buffers t
    elfeed-db-directory (elfeed/ "db/" t))
-  ;; https://old.reddit.com/r/emacs/comments/rlli0u/whats_your_favorite_defadvice/hphfh4e/
-  (advice-add #'elfeed-search-update--force :after #'elfeed-db-save)
+  (:with-mode elfeed-search-mode
+    (:hook #'hl-line-mode)
+    ;; https://old.reddit.com/r/emacs/comments/rlli0u/whats_your_favorite_defadvice/hphfh4e/
+    (advice-add #'elfeed-search-update--force :after #'elfeed-db-save))
   (:with-mode elfeed-show-mode
     (:bind "SPC" #'+elfeed-scroll-up-command
            "S-SPC" #'+elfeed-scroll-down-command)
     (:hook #'reading-mode)
     (define-advice elfeed-show-entry (:after (&rest _))
       "Re-flow the entry a short time after showing it."
-      (run-at-time 0 nil #'elfeed-show-refresh))))
+      (run-at-time 0.1 nil #'elfeed-show-refresh))))
 
 (setup (:straight elfeed-org)
   (:option rmh-elfeed-org-files (list (elfeed/ "elfeed.org" t)))
-- 
cgit 1.4.1-21-gabe81