From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 24 Oct 2021 20:21:04 +0000 (+0200)
Subject: Display a message if HMTL rendering takes a long time
X-Git-Tag: emacs-29.0.90~3671^2~432
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=57f3a1eb009e1127d3fe5739933c95c6fdb84d17;p=emacs.git

Display a message if HMTL rendering takes a long time

* lisp/net/eww.el (eww-display-html): Display a message if HTML
rendering takes a long time (bug#19776).
---

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index c24a2c52bee..e0bc17b5a5d 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -694,7 +694,8 @@ The renaming scheme is performed in accordance with
                 (meta . eww-tag-meta)
                 (a . eww-tag-a)))))
 	(erase-buffer)
-	(shr-insert-document document)
+        (with-delayed-message 2 "Rendering HTML..."
+	  (shr-insert-document document))
 	(cond
 	 (point
 	  (goto-char point))