Add shr-heading from oantolin

2022-04-12 22:40:37 -05:00 · 2022-04-12 22:40:37 -05:00 · ca1823d2b2
parent b868fa30e8
commit ca1823d2b2
1 changed files with 5 additions and 1 deletions
--- a/init.el
+++ b/init.el
@ -780,8 +780,12 @@
  (add-hook 'kill-buffer-query-functions #'+scratch-immortal))

 (setup shr
+  (:also-load +shr)
  (:option shr-width (- fill-column 5)  ; pad out for wide letters
-           shr-use-fonts t))
+           shr-use-fonts t)
+  (dolist (mode '(eww-mode
+                  elfeed-show-mode))
+    (add-hook (intern (format "%s-hook" mode)) #'+shr-heading-setup-imenu)))

 (setup tab-bar
  (:require +tab-bar)