diff options
| author | David Bremner <david@tethera.net> | 2018-03-17 14:00:15 -0300 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2018-03-17 14:01:00 -0300 |
| commit | 1064ff18be10106a45aa01eaf0f3836a61c00ca6 (patch) | |
| tree | 903663f78ffc45c1486d41f0f7ad2ecadfb50ccb | |
| parent | 274edd222425206a70cbbb626e2554b12bcb5d78 (diff) | |
add an example of calling an arbitrary function, with side effects
| -rw-r--r-- | example.emacs.el | 9 |
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))) |