mail2lj/mail2lj.pl - diff

Return to mail2lj.pl CVS log

Up to [Local Repository] / mail2lj

version 1.5, 2007/08/14 05:38:33	version 1.6, 2007/08/14 06:13:58
Line 621 sub post_me2req {	Line 621 sub post_me2req {
# Be forewarned!	# Be forewarned!
if ( $opt_addfrom ) {	if ( $opt_addfrom ) {
$hr->{event} = "From: $from" . "\n\n" . $hr->{event} ;	$hr->{event} = "From: $from" . "\n\n" . $hr->{event} ;
$hr->{event} = $plain_from . $hr->{event} ;
} elsif ( $opt_addfromh ) {	} elsif ( $opt_addfromh ) {
my $html_from = "<nobr><i><b>From:</b> $from</i></nobr>" ;	my $html_from = "<nobr><i><b>From:</b> $from</i></nobr>" ;
$html_from =~ s/\@/[_\@_]/g ;	$html_from =~ s/\@/[_\@_]/g ;