summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Bremner <david@tethera.net>2018-03-17 14:00:15 -0300
committerDavid Bremner <david@tethera.net>2018-03-17 14:01:00 -0300
commit1064ff18be10106a45aa01eaf0f3836a61c00ca6 (patch)
tree903663f78ffc45c1486d41f0f7ad2ecadfb50ccb
parent274edd222425206a70cbbb626e2554b12bcb5d78 (diff)
add an example of calling an arbitrary function, with side effects
-rw-r--r--example.emacs.el9
1 files changed, 8 insertions, 1 deletions
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 <david@example.com>")
("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)))