From 8d44c6bcddb2ab7ce32dd1ac1897b3c527c09575 Mon Sep 17 00:00:00 2001 From: Marcus Comstedt <marcus@mc.pp.se> Date: Mon, 5 May 1997 14:33:11 +0200 Subject: [PATCH] Added extra argument to encode to make Nisse happy. Rev: lib/modules/MIME.pmod:1.4 --- lib/modules/MIME.pmod | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/lib/modules/MIME.pmod b/lib/modules/MIME.pmod index 6890ec5d70..1a44c42324 100644 --- a/lib/modules/MIME.pmod +++ b/lib/modules/MIME.pmod @@ -1,5 +1,5 @@ /* - * $Id: MIME.pmod,v 1.3 1997/03/26 21:11:07 grubba Exp $ + * $Id: MIME.pmod,v 1.4 1997/05/05 12:33:11 marcus Exp $ * * RFC1521 functionality for Pike * @@ -34,13 +34,14 @@ class support { } } - string encode( string data, string encoding, void|string filename ) + string encode( string data, string encoding, void|string filename, + void|int stripcrlf ) { switch (lower_case( encoding || "binary" )) { case "base64": - return encode_base64( data ); + return (stripcrlf? encode_base64( data )-"\r\n" : encode_base64( data )); case "quoted-printable": - return encode_qp( data ); + return (stripcrlf? encode_qp( data )-"\r\n" : encode_qp( data )); case "x-uue": return encode_uue( data, filename ); case "7bit": @@ -92,7 +93,7 @@ class support { throw (({ "invalid rfc1522 encoding "+encoding+"\n", backtrace() })); } return "=?"+word[1]+"?"+encoding[0..0]+"?"+ - replace( encode( word[0], encoding ), + replace( encode( word[0], encoding, 0, 1 ), ({ "?", "_" }), ({ "=3F", "=5F" }))+"?="; } -- GitLab