X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FMisc.pm;h=380f8959d234dfc7b1d512aea5a46cbc90ad385f;hb=6b28d0bd4b422d0fff32b559d0785665b1c46b27;hp=c598507cc998e3c424f4b9546233118912f0f628;hpb=4c11454b932bb5cc58ad6405949c815beebc3278;p=freeside.git diff --git a/FS/FS/Misc.pm b/FS/FS/Misc.pm index c598507cc..380f8959d 100644 --- a/FS/FS/Misc.pm +++ b/FS/FS/Misc.pm @@ -154,6 +154,7 @@ sub send_email { unshift @mimeparts, { 'Type' => ( $options{'content-type'} || 'text/plain' ), + 'Charset' => 'UTF-8', 'Data' => $options{'body'}, 'Encoding' => ( $options{'content-type'} ? '-SUGGEST' : '7bit' ), 'Disposition' => 'inline', @@ -165,6 +166,7 @@ sub send_email { 'Type' => ( $options{'content-type'} || 'text/plain' ), 'Data' => $options{'body'}, 'Encoding' => ( $options{'content-type'} ? '-SUGGEST' : '7bit' ), + 'Charset' => 'UTF-8', ); } @@ -363,6 +365,7 @@ sub generate_email { $alternative->attach( 'Type' => 'text/plain', 'Encoding' => 'quoted-printable', + 'Charset' => 'UTF-8', #'Encoding' => '7bit', 'Data' => $data, 'Disposition' => 'inline', @@ -715,7 +718,9 @@ sub generate_ps { _pslatex($file); - system('dvips', '-q', '-t', 'letter', "$file.dvi", '-o', "$file.ps" ) == 0 + my $papersize = $conf->config('papersize') || 'letter'; + + system('dvips', '-q', '-t', $papersize, "$file.dvi", '-o', "$file.ps" ) == 0 or die "dvips failed"; open(POSTSCRIPT, "<$file.ps") @@ -770,8 +775,10 @@ sub generate_pdf { my $sfile = shell_quote $file; #system('dvipdf', "$file.dvi", "$file.pdf" ); + my $papersize = $conf->config('papersize') || 'letter'; + system( - "dvips -q -t letter -f $sfile.dvi ". + "dvips -q -f $sfile.dvi -t $papersize ". "| gs -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -sOutputFile=$sfile.pdf ". " -c save pop -" ) == 0