diff options
author | Matthew Somerville <matthew@fury.ukcod.org.uk> | 2011-03-03 20:13:16 +0000 |
---|---|---|
committer | Matthew Somerville <matthew@fury.ukcod.org.uk> | 2011-03-03 20:13:16 +0000 |
commit | eac621cd9add21d7f6e5e3c3953f9c920d3b388e (patch) | |
tree | 2fd9b8f7ab539ef5083eb5cbf2b208b8e6bccb2f | |
parent | 1d77a9b7c48cb99c1e21822fc5809a99c0e85901 (diff) |
Don't encode binary.
-rw-r--r-- | perllib/Page.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perllib/Page.pm b/perllib/Page.pm index f5d97d63c..ffe16fb9a 100644 --- a/perllib/Page.pm +++ b/perllib/Page.pm @@ -63,7 +63,7 @@ sub do_fastcgi { my $old_fh = select($str_fh); &$func($q); select($old_fh) if defined $old_fh; - print encode_utf8(${$str_fh->string_ref}); + print $binary ? ${$str_fh->string_ref} : encode_utf8(${$str_fh->string_ref}); dbh()->rollback() if $mySociety::DBHandle::conf_ok; $W->exit_if_changed(); } |