Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!apple!bbn!gateway!ipl.rpi.EDU!rodney From: rodney@ipl.rpi.EDU (Rodney Peck II) Newsgroups: comp.emacs Subject: Zippy hook Message-ID: <8907071647.AA06181@ipl.rpi.edu> Date: 7 Jul 89 16:47:48 GMT References: <8907071644.AA01756@toucan.LCS.MIT.EDU> Sender: news@bbn.COM Organization: BBN news/mail gateway Lines: 29 In article mumble mumble bard@theory.lcs.mit.edu writes: b> X-Zippy: Eisenhower!! Your mimeograph machine upsets my stomach!! b> X-Bard: All these functions! What do they all mean? b> So here's an alternate version: b> (defun add-zippyism () b> (save-excursion b> (mail-position-on-field "X-Zippy") b> (insert (yow)))) b> (You could have found this out by looking at the code for sendmail.el -- b> probably in about the same place you found the mail-setup-hook variable. aww. That takes all the fun out of it. Actually, I saw the mail-setup-hook in the docs for the mail function: mail: Edit a message to be sent. Argument means resume editing (don't erase). Returns with message buffer selected; value t if message freshly initialized. While editing message, type C-c C-c to send the message and exit. ..[about 20 lines deleted]... If mail-setup-hook is bound, its value is called with no arguments after the message is initialized. It can add more default fields. [and more stuff...] it doesn't mention mail-position-on-field Rodney