X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FHval.pm;h=e0ec630583dd84364c6131575d8bf5a655d816a4;hb=f76f265a851944b5dedcc3be5f3b5224b6ebda89;hp=d8b31c84ad6e11ab937cc5311158f599fbb48c25;hpb=d7fcdec712accc212bcfa35e50ade1233eb9beb3;p=public-inbox.git diff --git a/lib/PublicInbox/Hval.pm b/lib/PublicInbox/Hval.pm index d8b31c84..e0ec6305 100644 --- a/lib/PublicInbox/Hval.pm +++ b/lib/PublicInbox/Hval.pm @@ -1,4 +1,4 @@ -# Copyright (C) 2014, Eric Wong and all contributors +# Copyright (C) 2014-2015 all contributors # License: AGPLv3 or later (https://www.gnu.org/licenses/agpl-3.0.txt) # # represents a header value in various forms @@ -8,7 +8,7 @@ use warnings; use fields qw(raw href); use Encode qw(find_encoding); use URI::Escape qw(uri_escape_utf8); -use PublicInbox::MID qw/mid_clean mid_compressed/; +use PublicInbox::MID qw/mid_clean/; my $enc_ascii = find_encoding('us-ascii'); @@ -25,9 +25,9 @@ sub new { } sub new_msgid { - my ($class, $msgid) = @_; + my ($class, $msgid, $no_compress) = @_; $msgid = mid_clean($msgid); - $class->new($msgid, mid_compressed($msgid)); + $class->new($msgid, $msgid); } sub new_oneline {