| @@ -3051,6 +3051,33 @@ If target path is not found in COMMITISH tree, go up path and try again until fo | |||||
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | ||||
| ;; j2-mode jinja2-mmm-mode? | ;; j2-mode jinja2-mmm-mode? | ||||
| (define-derived-mode jinja2-mmm-mode prog-mode | |||||
| "Jinja2 MMM" | |||||
| "Major mode to setup mmm-mode for jinja2 files." | |||||
| (require 'mmm-mode) | |||||
| (require 'mmm-jinja2) | |||||
| (let* ((origname buffer-file-name) | |||||
| (withoutj2 buffer-file-name) | |||||
| (withoutj2 (replace-regexp-in-string "\\.j2\\'" | |||||
| "" | |||||
| withoutj2)) | |||||
| (withoutj2 (replace-regexp-in-string "\\.j2\\'" | |||||
| "" | |||||
| withoutj2))) | |||||
| (unwind-protect | |||||
| (progn | |||||
| (let ((mode (assoc-default withoutj2 | |||||
| auto-mode-alist | |||||
| 'string-match))) | |||||
| (when mode | |||||
| (funcall mode))) | |||||
| (add-to-list 'mmm-classes | |||||
| 'jinja2) | |||||
| (mmm-mode-on)) | |||||
| (setq buffer-file-name origname)))) | |||||
| ;; (add-to-list 'auto-mode-alist | |||||
| ;; '("\\.j2\\'" . jinja2-mmm-mode)) | |||||
| ;; Local Variables: | ;; Local Variables: | ||||
| ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) | ;; flycheck-disabled-checkers: (emacs-lisp-checkdoc) | ||||