(mode . message-mode)))
("web"
(or
- (mode . web-mode)
+ ;; (mode . web-mode)
+ (mode . mhtml-mode)
(mode . css-mode)
(mode . scss-mode)
(mode . js2-mode)))
;; alternative: hs-lint https://github.com/ndmitchell/hlint/blob/20e116a043f2073c57b17b24ae6364b5e433ba7e/data/hs-lint.el
)
+(use-package mhtml-mode)
+
(use-package sgml-mode
:config
(setq sgml-basic-offset 2))
(setq css-indent-offset 2))
(use-package web-mode
+ :disabled
:mode "\\.html\\'"
:config
(b/setq-every 2
(web-mode-enable-auto-indentation nil))
(use-package emmet-mode
- :after (:any web-mode css-mode sgml-mode)
+ :after (:any mhtml-mode css-mode sgml-mode)
:bind* (("C-)" . emmet-next-edit-point)
("C-(" . emmet-prev-edit-point))
:config
(unbind-key "C-j" emmet-mode-keymap)
(setq emmet-move-cursor-between-quotes t)
- :hook (web-mode css-mode html-mode sgml-mode))
+ :hook (css-mode html-mode mhtml-mode sgml-mode))
(comment
(use-package meghanada
"C-c f n" "footnote")
(which-key-add-major-mode-key-based-replacements 'org-mode
"C-c C-v" "org-babel")
- (which-key-add-major-mode-key-based-replacements 'web-mode
- "C-c C-a" "web/attributes"
- "C-c C-b" "web/blocks"
- "C-c C-d" "web/dom"
- "C-c C-e" "web/element"
- "C-c C-t" "web/tags")
(which-key-mode)
:custom
;; easily type pretty quotes & other typography, like ‘’“”-–—«»‹›
(use-package typo
+ :disabled
:defer 0.5
:config
- :hook (web-mode . typo-mode))
+ :hook ((html-mode mhtml-mode) . typo-mode))
(use-package electric
:disabled
("C-c D b" . debbugs-gnu-bugs)
("C-c D e" .
(lambda ()
- (interactive)
+ (interactive) ; bug-gnu-emacs
(setq debbugs-gnu-current-suppress t)
(debbugs-gnu debbugs-gnu-default-severities '("emacs"))))
- ("C-c D g" .
+ ("C-c D g" . ; bug-gnuzilla
(lambda ()
(interactive)
(setq debbugs-gnu-current-suppress t)
(debbugs-gnu debbugs-gnu-default-severities '("gnuzilla"))))
- ("C-c D G" .
+ ("C-c D G b" . ; bug-guix
+ (lambda ()
+ (interactive)
+ (setq debbugs-gnu-current-suppress t)
+ (debbugs-gnu debbugs-gnu-default-severities '("guix"))))
+ ("C-c D G p" . ; guix-patches
(lambda ()
(interactive)
(setq debbugs-gnu-current-suppress t)
- (debbugs-gnu debbugs-gnu-default-severities '("guix"))))))
+ (debbugs-gnu debbugs-gnu-default-severities '("guix-patches"))))))
(use-package org-ref
:init