Re: [PATCH] Added --export option to git-send-email.

From: Junio C Hamano <gitster@pobox.com>
Date: Jul 13, 2008, 20:17 UTC
Message-ID: <7vskudr11m.fsf@gitster.siamese.dyndns.org>
In-Reply-To: <20080710170735.4c5b237a@linux360.ro>

Eduard - Gabriel Munteanu <eduard.munteanu@linux360.ro> writes:

Show 12 quoted lines

> diff --git a/git-send-email.perl b/git-send-email.perl
> index 3564419..53539cf 100755
> --- a/git-send-email.perl
> +++ b/git-send-email.perl
> @@ -741,6 +747,10 @@ X-Mailer: git-send-email $gitversion
>  
>  	if ($dry_run) {
>  		# We don't want to send the email.
> +	} elsif (defined $export_file) {
> +		my $mbox_from = "From $raw_from $date";
> +		$message =~ s/^(>{0,})From/>$1From/m;
> +		print $out "$mbox_from\n$header\n$message";

Sorry, but I am scratching my head here. Shouldn't this "bare From munging" be like this instead?

		$message =~ s/^From />From /m;