mmm-mode (xhtml + css + javascript)

Web標準編集用に、いろいろ参考にしながら、こんな感じで設定してみた。
とりあえず、動いている。様子をみる。

;;; prerequisites for mmm-mode

;;; html-helper-mode
(autoload 'html-helper-mode "html-helper-mode" "Yay HTML" t)
(setq auto-mode-alist (cons '("\\.html$" . html-helper-mode) auto-mode-alist))

;; css-mode
(autoload 'css-mode "css-mode")
(setq auto-mode-alist (cons '("\\.css$" . css-mode) auto-mode-alist))
(setq cssm-indent-function #'cssm-c-style-indenter)

;; javascript-mode
(add-to-list 'auto-mode-alist '("\\.js$" . javascript-mode))
(autoload 'javascript-mode "javascript" nil t)
(setq javascript-indent-level 4)


;;; mmm-mode for web standards

(load-library "mmm-mode")
(require 'mmm-auto)
(setq mmm-global-mode 'maybe)
(setq mmm-submode-decoration-level 3)
;;(set-face-bold-p 'mmm-default-submode-face t)                                                                                  
;;(set-face-background 'mmm-default-submode-face "#333333") ; meaningless
(set-face-background 'mmm-default-submode-face "black")
                                        ; On terminal, #RRGGBB rounded off
                                        ; to system-defined colors.

(mmm-add-classes
 '((embedded-css
    :submode css-mode
    :front "<style[^>]*>"
    :back "</style>")))
(mmm-add-mode-ext-class nil "\\.html?\\'" 'embedded-css)

(mmm-add-classes
 '((html-javascript
    :submode javascript-mode
    :front "<script[^>]*>"
    :back "</script>")))
(mmm-add-mode-ext-class nil "\\.html?\\'" 'html-javascript)