diff options
author | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-03-19 08:14:35 +0000 |
---|---|---|
committer | Eric Wong (Contractor, The Linux Foundation) <e@80x24.org> | 2018-03-19 08:16:34 +0000 |
commit | e0a7508d4d58efdf5f0cdb7f402a9af60e5324fd (patch) | |
tree | 4111156c5382f9f3668338502d14520d3323f906 /lib | |
parent | ad281240644ee370c75d95b35ad7833863257286 (diff) | |
download | public-inbox-e0a7508d4d58efdf5f0cdb7f402a9af60e5324fd.tar.gz |
use string ref for Email::Simple->new
Email::Simple is slightly faster this way, and Email::MIME and PublicInbox::MIME both wrap that.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/PublicInbox/Import.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/Import.pm b/lib/PublicInbox/Import.pm index 8406c9e2..e20c6e03 100644 --- a/lib/PublicInbox/Import.pm +++ b/lib/PublicInbox/Import.pm @@ -122,7 +122,7 @@ sub check_remove_v1 { $n = read($r, my $lf, 1); defined($n) or die "read final byte of cat-blob failed: $!"; die "bad read on final byte: <$lf>" if $lf ne "\n"; - my $cur = PublicInbox::MIME->new($buf); + my $cur = PublicInbox::MIME->new(\$buf); my $cur_s = $cur->header('Subject'); $cur_s = '' unless defined $cur_s; my $cur_m = $mime->header('Subject'); |