;;; polymode-settings.el --- Polymode settings  -*- lexical-binding: t -*-
;;; Commentary:
;;; Code:
(use-package polymode
  :commands poly-python-web-mode
  :config
  
  (define-hostmode poly-python-hostmode :mode 'python-mode)

  (define-innermode poly-python-web-expr-innermode
    :mode 'web-mode
    :head-matcher (rx "r" (= 3 (char "\"'")) (* (any space)))
    ;;:head-matcher (rx (= 3 (char "\"'")) (* (any space)))
    :tail-matcher (rx (= 3 (char "\"'")))
    :head-mode 'host
    :tail-mode 'host)

  (define-polymode poly-python-web-mode
    :hostmode 'poly-python-hostmode
    :innermodes '(poly-python-web-expr-innermode)))

(provide 'polymode-settings)
;;; polymode-settings.el ends here
