Я не уверен насчет основного режима, который уже делает это, но вы можете сделать его достаточно легко, используя define-производный-режим
(define-derived-mode rich-text-mode text-mode "Rich Text"
"text mode with string highlighting."
;;register keywords
(setq rich-text-font-lock-keywords
'(("\"\\(\\(?:.\\|\n\\)*?[^\\]\\)\"" 0 font-lock-string-face)))
(setq font-lock-defaults rich-text-font-lock-keywords)
(font-lock-mode 1))
В качестве альтернативы, вы можете добавить хук в текстовый режим:
(defun add-quotes-to-font-lock-keywords ()
(font-lock-add-keywords nil '(("\"\\(\\(?:.\\|\n\\)*?[^\\]\\)\"" 0 font-lock-string-face))))
(add-hook 'text-mode-hook 'add-quotes-to-font-lock-keywords)
Вообще говоря, хорошим режимом для редактирования любого текста является режим org. Однако по умолчанию он не блокирует шрифты.