X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FMisc.pm;h=2be9ec2030bff6ac21fb53ec766c118200f5bc60;hb=54422869b5d895058a78454ddfc7c01789cb56f7;hp=3b0de3dc3f2b0f0a81e8ee977dd865e93c2b20b9;hpb=4b80fe118da16b21603fcdbd090bc03d8fbf0578;p=freeside.git diff --git a/FS/FS/Misc.pm b/FS/FS/Misc.pm index 3b0de3dc3..2be9ec203 100644 --- a/FS/FS/Misc.pm +++ b/FS/FS/Misc.pm @@ -9,6 +9,7 @@ use IPC::Run qw( run timeout ); # for _pslatex use IPC::Run3; # for do_print... should just use IPC::Run i guess use File::Temp; use Tie::IxHash; +use Encode; #do NOT depend on any FS:: modules here, causes weird (sometimes unreproducable #until on client machine) dependancy loops. put them in FS::Misc::Something #instead @@ -187,7 +188,7 @@ sub send_email { 'Sender' => $options{'from'}, 'Reply-To' => $options{'from'}, 'Date' => time2str("%a, %d %b %Y %X %z", $time), - 'Subject' => $options{'subject'}, + 'Subject' => Encode::encode('MIME-Header', $options{'subject'}), 'Message-ID' => "<$message_id>", @mimeargs, ); @@ -352,8 +353,8 @@ sub generate_email { $alternative->attach( 'Type' => 'text/plain', - #'Encoding' => 'quoted-printable', - 'Encoding' => '7bit', + 'Encoding' => 'quoted-printable', + #'Encoding' => '7bit', 'Data' => $data, 'Disposition' => 'inline', ); @@ -374,7 +375,7 @@ sub generate_email { ' '. encode_entities($return{'subject'}), ' ', ' ', - ' ', + ' ', @html_data, ' ', '', @@ -912,6 +913,16 @@ sub ocr_image { @lines; } +=item spool_formats + +Returns a list of the invoice spool formats. + +=cut + +sub spool_formats { + qw(default oneline billco bridgestone) +} + =back =head1 BUGS