enable mhtml-mode by defaultfeature/mhtml-mode

* lisp/files.el (auto-mode-alist): Reference mhtml-mode, not
html-mode.
(magic-fallback-mode-alist): Likewise.
* lisp/net/eww.el (eww-view-source): Use mthml-mode.

1 files changed, 5 insertions, 2 deletions

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 619c703e01c..fe316579142 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -641,8 +641,11 @@ Currently this means either text/html or application/xhtml+xml."
             (when (coding-system-p cs)
               (decode-coding-region (point-min) (point-max) cs)
               (setq buffer-file-coding-system last-coding-system-used))))
-        (when (fboundp 'html-mode)
-          (html-mode))))
+        (cond
+         ((fboundp 'mhtml-mode)
+          (mhtml-mode))
+         ((fboundp 'html-mode)
+          (html-mode)))))
     (view-buffer buf)))
 
 (defun eww-toggle-paragraph-direction ()