From 6c70fca8ae519dd9393e5c7917a98ce51b1d0014 Mon Sep 17 00:00:00 2001 From: David Bremner Date: Thu, 3 Nov 2016 09:09:17 -0300 Subject: add defcustom for message-templ-config-alist This needs further testing, in particular the best way of applying named configurations needs to be clarified. --- message-templ.el | 12 ++++++++++++ 1 file changed, 12 insertions(+) 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 -- cgit v1.2.3