From 1064ff18be10106a45aa01eaf0f3836a61c00ca6 Mon Sep 17 00:00:00 2001 From: David Bremner Date: Sat, 17 Mar 2018 14:00:15 -0300 Subject: add an example of calling an arbitrary function, with side effects --- example.emacs.el | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/example.emacs.el b/example.emacs.el index 6be08a2..4fe349a 100644 --- a/example.emacs.el +++ b/example.emacs.el @@ -7,6 +7,10 @@ (setq message-templ-config-alist '(("^To:.*notmuch@notmuchmail.org" my-func))) +(defun do-stuff () + (setq notmuch-draft-folder "Sekrit.draft") + (message "hello world")) + (setq message-templ-alist '(("alternate" ("From" . "David Bremner ") ("Bcc" . "david@example.com")) @@ -18,5 +22,8 @@ ("Bcc" . "david@example.com") (top-file . "~/teaching/csXXXX/marks-top.msg") (bottom-file . "~/teaching/csXXXX/marks-bottom.msg") - ))) + ) + ("Agent Smith" + ("From" . "smith@example.com") + do-stuff))) -- cgit v1.2.3