diff options
| author | David Bremner <david@tethera.net> | 2016-11-03 09:09:17 -0300 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2016-11-03 09:09:17 -0300 |
| commit | 6c70fca8ae519dd9393e5c7917a98ce51b1d0014 (patch) | |
| tree | fd7be3e4e2668c595c6705a56cfa839e07b2dc82 | |
| parent | 62c08b9b5873bb9d38e02390016cd252ee6f16af (diff) | |
add defcustom for message-templ-config-alist
This needs further testing, in particular the best way of applying named
configurations needs to be clarified.
| -rw-r--r-- | message-templ.el | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/message-templ.el b/message-templ.el index cd4fc6f..a2f54c7 100644 --- a/message-templ.el +++ b/message-templ.el @@ -55,6 +55,18 @@ Remaining elements indicate actions." (sexp :tag "Function"))))) :group 'message-templ) +(defcustom message-templ-config-alist nil + "Alist of actions to apply +First element of each list is a regex which triggers the action if matched. +Remaining elements indicate actions." + :type '(repeat (list (string :tag "Header Regex") + (repeat + :inline t + (choice (cons (sexp :tag "Field(Variable)") + (sexp :tag "Value")) + (sexp :tag "Function"))))) + :group 'message-templ) + (defcustom message-templ-visible-select t "*If non-nil, select template with visible." :type 'boolean |