#
# Command to send mail with any to, from message-id, and subject
# fields.
#
if ( $1 == "" ) then
	echo "fcomp: usage: fcomp userid"
endif
#
cat > ~$USER/Mail/draft << zzz
From: wouldn't_you_like_to_know@BORAX.MIT.EDU
Message-Id: <8510311903.AA13599@BORAX.MIT.EDU>
To: Dave@Jack_Florey
Subject: hacks

<start message here, skipping 1 blank line!>
zzz
gnuemacs ~$USER/Mail/draft
echo " "
echo " "
echo "Fmailing..."
echo " "
#
/usr/lib/sendmail -ba $1 < ~$USER/Mail/draft
rm -f ~$USER/mail/\#draft >& /dev/null
mv ~$USER/Mail/draft ~$USER/Mail/\#draft