From 36f9794452b53d16ed35b4de213a825ac4bc2622 Mon Sep 17 00:00:00 2001 From: e-user Date: Mon, 13 Sep 2010 11:46:44 +0000 Subject: [PATCH] * added missing post decoding of latin-1 date svn path=/trunk/; revision=16784 --- Makefile.PL | 1 + cgi-bin/pdfcontest.pl | 2 ++ 2 files changed, 3 insertions(+) diff --git a/Makefile.PL b/Makefile.PL index eb1ab0072b..e22e369a2d 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -20,6 +20,7 @@ my %att = ( 'CGI' => 0, 'Cwd' => 0, 'DateTime' => 0, # Tested with 0.53 + 'Encode' => 0, # Tested with 2.35 'Fcntl' => 0, 'File::Basename' => 0, 'File::Copy' => 0, diff --git a/cgi-bin/pdfcontest.pl b/cgi-bin/pdfcontest.pl index 448e6d84b4..dbde33fa01 100755 --- a/cgi-bin/pdfcontest.pl +++ b/cgi-bin/pdfcontest.pl @@ -21,6 +21,7 @@ use lib "$root/tools"; use CGI; use DateTime; +use Encode qw (decode); use Template; use WebBuild::FormValidation; use WebBuild::DynamicContent; @@ -75,6 +76,7 @@ my $data = { institution_name => $query->param ('institution-name'), contact => $query->param ('contact') }; $template->process ('pdfreaders-mail.tt2', $data, \$mail); +$mail = decode ('iso-8859-1', $mail); # This must match the encoding of the website! open MAIL, "|/usr/lib/sendmail -t -f web\@fsfeurope.org"; print MAIL $mail;