aboutsummaryrefslogtreecommitdiffstats
path: root/perllib
diff options
context:
space:
mode:
authorMatthew Somerville <matthew-github@dracos.co.uk>2018-05-23 16:28:37 +0100
committerMatthew Somerville <matthew-github@dracos.co.uk>2018-05-23 16:28:37 +0100
commit31f1e1088de48d40175e36a67ea89234084b6c18 (patch)
tree99f5f696286d21f932ea631d86523024b101203f /perllib
parent507daabec76ceb56f783b9c07eec2c786349702d (diff)
parent6150cdcb32474102370a4be4d730ca55c1a74e7e (diff)
Merge branch 'quote-the-template-nevermore'
Diffstat (limited to 'perllib')
-rw-r--r--perllib/FixMyStreet/DB/ResultSet/DefectType.pm5
-rw-r--r--perllib/FixMyStreet/DB/ResultSet/ResponsePriority.pm3
-rw-r--r--perllib/FixMyStreet/DB/ResultSet/ResponseTemplate.pm5
3 files changed, 5 insertions, 8 deletions
diff --git a/perllib/FixMyStreet/DB/ResultSet/DefectType.pm b/perllib/FixMyStreet/DB/ResultSet/DefectType.pm
index b2ef77f7c..5b1247129 100644
--- a/perllib/FixMyStreet/DB/ResultSet/DefectType.pm
+++ b/perllib/FixMyStreet/DB/ResultSet/DefectType.pm
@@ -4,7 +4,6 @@ use base 'DBIx::Class::ResultSet';
use strict;
use warnings;
use Moo;
-use HTML::Entities;
with('FixMyStreet::Roles::ContactExtra');
@@ -16,10 +15,10 @@ sub map_extras {
my ($rs, @ts) = @_;
return map {
my $meta = $_->get_extra_metadata();
- my %extra = map { $_ => encode_entities($meta->{$_}) } keys %$meta;
+ my %extra = map { $_ => $meta->{$_} } keys %$meta;
{
id => $_->id,
- name => encode_entities($_->name),
+ name => $_->name,
extra => \%extra
}
} @ts;
diff --git a/perllib/FixMyStreet/DB/ResultSet/ResponsePriority.pm b/perllib/FixMyStreet/DB/ResultSet/ResponsePriority.pm
index 89bb4dfd7..96f7cf7a0 100644
--- a/perllib/FixMyStreet/DB/ResultSet/ResponsePriority.pm
+++ b/perllib/FixMyStreet/DB/ResultSet/ResponsePriority.pm
@@ -4,7 +4,6 @@ use base 'DBIx::Class::ResultSet';
use strict;
use warnings;
use Moo;
-use HTML::Entities;
with('FixMyStreet::Roles::ContactExtra');
@@ -14,7 +13,7 @@ sub join_table {
sub map_extras {
my ($rs, @ts) = @_;
- return map { { id => $_->id, name => encode_entities($_->name) } } @ts;
+ return map { { id => $_->id, name => $_->name } } @ts;
}
1;
diff --git a/perllib/FixMyStreet/DB/ResultSet/ResponseTemplate.pm b/perllib/FixMyStreet/DB/ResultSet/ResponseTemplate.pm
index aa070daa3..46fcba153 100644
--- a/perllib/FixMyStreet/DB/ResultSet/ResponseTemplate.pm
+++ b/perllib/FixMyStreet/DB/ResultSet/ResponseTemplate.pm
@@ -2,7 +2,6 @@ package FixMyStreet::DB::ResultSet::ResponseTemplate;
use base 'DBIx::Class::ResultSet';
use Moo;
-use HTML::Entities;
with('FixMyStreet::Roles::ContactExtra');
@@ -17,8 +16,8 @@ sub name_column {
sub map_extras {
my ($rs, @ts) = @_;
return map {
- my $out = { id => encode_entities($_->text), name => encode_entities($_->title) };
- $out->{state} = encode_entities($_->state) if $_->state;
+ my $out = { id => $_->text, name => $_->title };
+ $out->{state} = $_->state if $_->state;
$out;
} @ts;
}