FSFE/fsfe-website
25
31
Fork 92
Code Issues 65 Pull Requests 5 Wiki Activity

introduce static response page for pdf petition

Browse Source 
svn path=/trunk/; revision=30588
This commit is contained in:
paul 2015-02-12 14:23:04 +00:00
parent fabdf93b9d
commit 01acf944ea
3 changed files with 38 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
campaigns/pdfreaders/petition-error.en.xhtml Normal file
View File

@ -0,0 +1,22 @@
<?xml version="1.0" encoding="UTF-8" ?>
<html>
<head>
<title>PDFreaders - Petition</title>
</head>
<body>
<p id="category"><a href="/campaigns/pdfreaders/pdfreaders.html">Free Software PDF Readers</a></p>
<h1>Error signing petition</h1>
<p>
Sorry, there seems to be a problem with your signature. Please check if the following inputs are present and spelled correctly:
<ul>
<li>Name</li>
<li>Surname</li>
<li>Country</li>
<li>Email</li>
</ul>
</p><p>
If you contuinue to experience technical errors, we would appreciate if you sent an email to <a href="mailto:webmaster@fsfeurope.org">webmaster@fsfeurope.org</a>.
</p>
</body>
</html>

12
campaigns/pdfreaders/petition-success.en.xhtml Normal file
View File

@ -0,0 +1,12 @@
<?xml version="1.0" encoding="UTF-8" ?>
<html>
<head>
<title>PDFreaders - Petition</title>
</head>
<body>
<p id="category"><a href="/campaigns/pdfreaders/pdfreaders.html">Free Software PDF Readers</a></p>
<h1>Petition signed successfully</h1>
<p>Thank you for signing - your signature has been recorded, and will be added shortly.</p>
</body>
</html>

20
cgi-bin/pdfpetition.pl
View File

@ -8,7 +8,8 @@ PDFreaders petition form processing script.
=head1 AUTHOR
Sam Tuke <mail@samtuke.com>, extending Alexander Kahl <e-user@fsfe.org>
2015 - Paul Hänsch <paul@fsfe.org>
Previous authors: Sam Tuke <mail@samtuke.com>, extending Alexander Kahl <e-user@fsfe.org>
=cut
@ -37,7 +38,6 @@ use constant UPLOAD => "$root/upload/pdfreaders";
# Start actual logic
my $form = WebBuild::FormValidation->new;
my $content = WebBuild::DynamicContent->new;
my $query = CGI->new;
my $lang = $query->param('lang');
@ -46,8 +46,6 @@ unless ($lang =~ m/^[a-z]{2}$/ and -f "$root/campaigns/pdfreaders/petition.$lang
{
$lang = 'en';
}
$content->layout ("$root/campaigns/pdfreaders/petition.$lang.html");
$form->validates_presence_of ('name');
$form->validates_presence_of ('surname');
$form->validates_presence_of ('country');
@ -55,8 +53,7 @@ $form->validate_format ('email', type => 'email');
if ($form->has_errors)
{
$content->content ($form->get_errors);
$content->render;
print "Location: /campaigns/pdfreaders/petition-error.$lang.html\n\n";
exit;
}
elsif ($query->param ('url')) # Bot!!
@ -84,13 +81,4 @@ open MAIL, "|/usr/lib/sendmail -t";
print MAIL $mail;
close MAIL;
my $output = <<'EOF';
<div id="flash">
<p>Thank you for signing - your signature has been recorded, and will be added shortly.</p>
</div>
EOF
$content->content ($output);
$content->render_utf8
print "Location: /campaigns/pdfreaders/petition-success.$lang.html\n\n";