Fix parens typo in add-hook example

You had (let ((symbol valueform) body)).
This commit is contained in:
David Pflug 2012-11-29 07:47:30 -05:00
parent 5335908f57
commit 12799b8f50
1 changed files with 2 additions and 2 deletions

View File

@ -1362,14 +1362,14 @@ Let's look at some examples. First, suppose we want to set the
(add-hook 'mu4e-compose-pre-hook
(defun my-set-from-address ()
"Set the From address based on the To address of the original."
(let ((msg mu4e-compose-parent-message) ;; msg is shorter...
(let ((msg mu4e-compose-parent-message)) ;; msg is shorter...
(setq user-mail-address
(cond
((mu4e-message-contact-field-matches msg :to "me@@foo.com")
"me@@foo.com")
((mu4e-message-contact-field-matches msg :to "me@@bar.com")
"me@@bar.com")
(t "me@@cuux.com")))))))
(t "me@@cuux.com"))))))
@end lisp
Second, as mentioned, @code{mu4e-compose-mode-hook} is especially useful for