inline and simplify spw/next-eww-readable

1 files changed, 1 insertions, 9 deletions

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index e5b676f2..2db10c7f 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -2486,14 +2486,6 @@ mutt's review view, after exiting EDITOR."
 
 ;;;; EWW
 
-(defun spw/eww-readable-once ()
-  (unwind-protect
-      (eww-readable)
-    (remove-hook 'eww-after-render-hook #'spw/eww-readable-once)))
-
-(defun spw/next-eww-readable ()
-  (add-hook 'eww-after-render-hook #'spw/eww-readable-once))
-
 ;; this should ensure that M-a and M-e work for most webpages
 (add-hook 'eww-mode-hook (lambda ()
 			   (setq-local sentence-end-double-space nil)))
@@ -2792,7 +2784,7 @@ to open them using `spw/try-external-open'")
 	  ;; (start-process "firefox" nil "firefox"
 	  ;;                "-new-window"
 	  ;;                (concat "about:reader?url=" url))
-	  (spw/next-eww-readable)
+	  (spw/add-once-hook 'eww-after-render-hook #'eww-readable)
 	  (eww url)))))))
 
 (defun spw/notmuch-show-stable-matching-query ()