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 c24a2c52bee3cfa6a9a177431431b9a3fe542044..e0bc17b5a5dcc65de31a547f65b00c67197c935d 100644 (file)
--- 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))