🚀 go-pugleaf

[ 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