aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Page.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew@fury.ukcod.org.uk>2011-02-22 15:26:51 +0000
committerMatthew Somerville <matthew@fury.ukcod.org.uk>2011-02-22 15:26:51 +0000
commite3c8c5d194a7a7dce70152f89c65616c8981c1a3 (patch)
tree281183e4345f8d9a400c4b651140f4055635a375 /perllib/Page.pm
parent3c97d45cb1a3803e74c43ef3eca3beb4a5d3ed23 (diff)
Couple of URI escaping fixes, plus cope with different versions of LWP returning content/decoded_content.
Diffstat (limited to 'perllib/Page.pm')
-rw-r--r--perllib/Page.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm
index 447d9eda2..68a027e4b 100644
--- a/perllib/Page.pm
+++ b/perllib/Page.pm
@@ -305,7 +305,7 @@ sub footer {
my ($q, %params) = @_;
my $pc = $q->param('pc') || '';
- $pc = '?pc=' . URI::Escape::uri_escape($pc) if $pc;
+ $pc = '?pc=' . URI::Escape::uri_escape_utf8($pc) if $pc;
my $creditline = _('Built by <a href="http://www.mysociety.org/">mySociety</a>, using some <a href="http://github.com/mysociety/fixmystreet">clever</a>&nbsp;<a href="https://secure.mysociety.org/cvstrac/dir?d=mysociety/services/TilMa">code</a>.');
if (mySociety::Config::get('COUNTRY') eq 'NO') {