summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Bremner <david@tethera.net>2016-11-04 13:13:44 -0300
committerDavid Bremner <david@tethera.net>2016-11-04 13:13:44 -0300
commite6d2aa85e33eb167551984e75eb2d69a0ca36c18 (patch)
tree6b2eb4116c63f7ec0077b7be48c20bc1215ee1e7
parent6c70fca8ae519dd9393e5c7917a98ce51b1d0014 (diff)
Allow named templates in message-templ-config-alist
-rw-r--r--message-templ.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/message-templ.el b/message-templ.el
index a2f54c7..d9d1a5b 100644
--- a/message-templ.el
+++ b/message-templ.el
@@ -62,7 +62,8 @@ Remaining elements indicate actions."
:type '(repeat (list (string :tag "Header Regex")
(repeat
:inline t
- (choice (cons (sexp :tag "Field(Variable)")
+ (choice (string :tag "Template")
+ (cons (sexp :tag "Field(Variable)")
(sexp :tag "Value"))
(sexp :tag "Function")))))
:group 'message-templ)
@@ -201,6 +202,8 @@ Remaining elements indicate actions."
(while clist
(setq config (car clist))
(cond
+ ((stringp config)
+ (message-templ-apply config))
((functionp config)
(funcall config))
((consp config)