aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/net/eww.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 4df9740d540..6559c7e5eb9 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -651,9 +651,10 @@ Will call each function in `eww-guess-content-type-functions', until one
651of them returns a value. This mechanism is used only if there isn't a 651of them returns a value. This mechanism is used only if there isn't a
652valid Content-Type header. If none of the functions can guess, return 652valid Content-Type header. If none of the functions can guess, return
653\"application/octet-stream\"." 653\"application/octet-stream\"."
654 (or (run-hook-with-args-until-success 654 (save-excursion
655 'eww-guess-content-type-functions headers response-buffer) 655 (or (run-hook-with-args-until-success
656 "application/octet-stream")) 656 'eww-guess-content-type-functions headers response-buffer)
657 "application/octet-stream")))
657 658
658(defun eww--html-if-doctype (_headers response-buffer) 659(defun eww--html-if-doctype (_headers response-buffer)
659 "Return \"text/html\" if RESPONSE-BUFFER has an HTML doctype declaration. 660 "Return \"text/html\" if RESPONSE-BUFFER has an HTML doctype declaration.