aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm
diff options
context:
space:
mode:
authorMatthew Somerville <matthew-github@dracos.co.uk>2019-01-16 11:09:35 +0000
committerMatthew Somerville <matthew-github@dracos.co.uk>2019-01-16 11:09:35 +0000
commit7ee6a869233e90c54ecce1863389bb5e5cb65b36 (patch)
treee06dd297f23d91d5ef3bb5a8f127e7ce8b1faeb0 /perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm
parent53624a3800db9500ad35900466aa44ad55e57c23 (diff)
parent922976648c7acf072f85716f5257a4bfcda35599 (diff)
Merge branch 'moderation-in-front-end-updates'
Diffstat (limited to 'perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm')
-rw-r--r--perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm9
1 files changed, 8 insertions, 1 deletions
diff --git a/perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm b/perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm
index 01ae1d6e1..1e61b946a 100644
--- a/perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm
+++ b/perllib/FixMyStreet/DB/Result/ModerationOriginalData.pm
@@ -167,7 +167,14 @@ sub compare_extra {
push @s, string_diff("$_ = $old->{$_}", "");
}
}
- return join ', ', @s;
+ return join ', ', grep { $_ } @s;
+}
+
+sub extra_diff {
+ my ($self, $other, $key) = @_;
+ my $o = $self->get_extra_metadata($key);
+ my $n = $other->get_extra_metadata($key);
+ return string_diff($o, $n);
}
sub string_diff {