add gui, mail and programming language settings

settings/polymode-settings.el

@@ -0,0 +1,25 @@
+;;; polymode-settings.el --- Polymode settings  -*- lexical-binding: t -*-
+;;; Commentary:
+;;; Code:
+(use-package polymode
+  :load-path (lambda() (concat user-emacs-directory "lisp/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