# BEGIN_MTA_SEND
# MTA: sendmail
# sending mail

	# For sendmail, we call the "real" local delivery agent

	open(MAIL, "|-") || exec($LDA, @LDAARGS);
	while (<$msgfh>) {
	    next if ($seen_xheader == 0 && m/^$X_HEADER_TAG:/o);
	    if ($seen_xheader == 0 && m/\A\r?\n\Z/) {
		print MAIL "$X_HEADER_TAG: $X_HEADER_LINE\n";
		$seen_xheader = 1;
	    }
	    print MAIL $_;
	}

	close(MAIL) or die "Can't close output pipe: $!";

	# Pass up the LDA's error code
	do_exit(retcode($?), __LINE__);
# END_MTA_SEND
