Mercurial Mercurial > dot-emacs / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Replace html-mode with web-mode in ``magic-fallback-mode-alist``.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Sat, 19 Nov 2016 17:46:22 +0200
changeset 1447 8cde360dda53
parent 1446 78d0fef31a4b
child 1448 6e3c4ea65439
Replace html-mode with web-mode in ``magic-fallback-mode-alist``.
.emacs-my file | annotate | diff | comparison | revisions 
--- 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?\\'")
dot-emacs