masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-07 12:49:38 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

* lisp/textmodes/mhtml-mode.el: Avoid loading flyspell. (Bug#33939)

Browse source
This commit is contained in:
Leo Liu 2019-01-07 07:22:45 +08:00
parent 99e2ad9e4e
commit 2cf20b67cf
1 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/textmodes/mhtml-mode.el
View file

@ -21,13 +21,10 @@
;;; Code: ;;; Code:
(eval-and-compile (eval-and-compile (require 'sgml-mode))
(require 'flyspell)
(require 'sgml-mode))
(require 'js) (require 'js)
(require 'css-mode) (require 'css-mode)
(require 'prog-mode) (require 'prog-mode)
(require 'font-lock)
(defcustom mhtml-tag-relative-indent t (defcustom mhtml-tag-relative-indent t
"How <script> and <style> bodies are indented relative to the tag. "How <script> and <style> bodies are indented relative to the tag.
@ -349,6 +346,8 @@ This is used by `mhtml--pre-command'.")
;; HTML. ;; HTML.
(sgml-indent-line)))) (sgml-indent-line))))
(declare-function flyspell-generic-progmode-verify "flyspell")
(defun mhtml--flyspell-check-word () (defun mhtml--flyspell-check-word ()
(let ((submode (get-text-property (point) 'mhtml-submode))) (let ((submode (get-text-property (point) 'mhtml-submode)))
(if submode (if submode