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