local-mh-users-request@ics.uci.edu.UUCP (01/30/88)
[ context: MH 6.5 running on a Sun 3, SunOS 3.4, GNU Emacs 18.44 ]
I have modified mh-e.el 3.4k to use the draft folder facility if enabled in
.mh_profile. Works fine, except for the "dist" function. I have modified
the redistribution function so that instead of calling send as
(call-process "/bin/sh" nil 0 nil "-c"
(format "mhdist=1 mhaltmsg=%s %s/send -push %s/draft"
msg-filename mh-progs mh-user-path))
it invokes "send" on the current draftfolder draft (which contains nothing but
the "Resent-To: " line -- the proper variable is set so that the message does
not get included)
(call-process "/bin/sh" nil 0 nil "-c"
(format "mhdist=1 mhaltmsg=%s %s/send -push %s"
msg-filename mh-progs (buffer-file-name)))
The environment gets set, and seems to look like what "dist" would end up
doing (from a quick perusal of the source). Still, I get back an error message
from post complaining about the "Resent-To" header lines, which indicates
it never received the -dist flag.
Invoking "post -dist" instead of "send" works. Clues, anyone?
Jean-Francois Lamy
AI Group, Department of Computer Science lamy@ai.toronto.edu
University of Toronto, Canada M5S 1A4 uunet!ai.toronto.edu!lamy