# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1479570382 -7200
# Node ID 8cde360dda539c9565522e54592ae167fc300ff5
# Parent  78d0fef31a4be2ea9a023915de9143f527f8f926
Replace html-mode with web-mode in ``magic-fallback-mode-alist``.

diff -r 78d0fef31a4b -r 8cde360dda53 .emacs-my
--- a/.emacs-my	Sat Oct 29 00:14:38 2016 +0300
+++ b/.emacs-my	Sat Nov 19 17:46:22 2016 +0200
@@ -3233,7 +3233,14 @@
 (setq web-mode-enable-comment-keywords t)
 
 (ignore-errors (require 'web-mode))
+
 (when (featurep 'web-mode)
+  ;; Replace html-mode  with web-mode.
+  (when (cl-some (lambda (spec) (eq (cdr spec) 'html-mode))
+                 magic-fallback-mode-alist)
+    (setq magic-fallback-mode-alist (copy-tree magic-fallback-mode-alist))
+    (mapc (lambda (spec) (when (eq (cdr spec) 'html-mode) (setcdr spec 'web-mode)))
+          magic-fallback-mode-alist))
   (setq web-mode-engine-file-regexps (delq (assoc "jsp" web-mode-engine-file-regexps) web-mode-engine-file-regexps))
   (mapc (lambda (i) (add-to-list 'web-mode-engine-file-regexps i))
           '(("jsp" . "\\.tagf?\\'")