X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FMIME.pm;fp=Debbugs%2FMIME.pm;h=2a695e5859a96a506cceac22c7abba40df44e51b;hb=343464a69a83b5b2f1e956386482baaaccbc835c;hp=183adc7df072bb732155b1c022639f676cc5c3af;hpb=ad9a9963bb590b92111b604365b8b7ab9ecac982;p=debbugs.git diff --git a/Debbugs/MIME.pm b/Debbugs/MIME.pm index 183adc7..2a695e5 100644 --- a/Debbugs/MIME.pm +++ b/Debbugs/MIME.pm @@ -215,8 +215,7 @@ BEGIN { ])); } -sub decode_rfc1522 ($) -{ +sub decode_rfc1522 { my ($string) = @_; # this is craptacular, but leading space is hacked off by unmime. @@ -240,7 +239,7 @@ MIME::Words::encode_mimeword on distinct words as appropriate. # We cannot use MIME::Words::encode_mimewords because that function # does not handle spaces properly at all. -sub encode_rfc1522 ($) { +sub encode_rfc1522 { my ($rawstr) = @_; # handle being passed undef properly