From c60c819afb9c6bbab3b02ebe12b6103394c00343 Mon Sep 17 00:00:00 2001 From: Ken'ichi Fukamachi Date: Fri, 7 Sep 2018 22:46:52 +0900 Subject: remove base64() and qp(). --- fml/lib/Mail/Message/Encode.pm | 35 ----------------------------------- 1 file changed, 35 deletions(-) diff --git a/fml/lib/Mail/Message/Encode.pm b/fml/lib/Mail/Message/Encode.pm index c21363a8..5f17af32 100644 --- a/fml/lib/Mail/Message/Encode.pm +++ b/fml/lib/Mail/Message/Encode.pm @@ -428,41 +428,6 @@ sub encode_mime_string } -=head2 base64($str, $out_code, $in_code) - -encode $str by base64 with out code out_code. -$in_code is use as a hint. - -=head2 qp($str, $out_code, $in_code) - -encode $str by quoted-printable with out code out_code. -$in_code is use as a hint. - -=cut - - -# Descriptions: encode $str by base64. -# Arguments: OBJ($self) STR($str) STR($out_code) STR($in_code) -# Side Effects: none -# Return Value: STR -sub base64 -{ - my ($self, $str, $out_code, $in_code) = @_; - $self->encode_mime_string($str, 'base64', $out_code, $in_code); -} - - -# Descriptions: encode $str by quoted-printable. -# Arguments: OBJ($self) STR($str) STR($out_code) STR($in_code) -# Side Effects: none -# Return Value: STR -sub qp -{ - my ($self, $str, $out_code, $in_code) = @_; - $self->encode_mime_string($str, 'qp', $out_code, $in_code); -} - - =head2 decode_mime_string(string, [$options]) decode a base64/quoted-printable encoded string to a plain message. -- cgit v1.2.1