diff options
Diffstat (limited to 'perllib/FixMyStreet')
| -rw-r--r-- | perllib/FixMyStreet/Template.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/perllib/FixMyStreet/Template.pm b/perllib/FixMyStreet/Template.pm index ffebb00cf..fb63071c3 100644 --- a/perllib/FixMyStreet/Template.pm +++ b/perllib/FixMyStreet/Template.pm @@ -70,6 +70,18 @@ sub loc : Fn { return FixMyStreet::Template::SafeString->new($s); } +=head2 loc_js + +Same as loc() but escapes single quotes (for use in JavaScript). + +=cut + +sub loc_js : Fn { + my $s = _(@_); + $s =~ s/'/\\'/g; + return FixMyStreet::Template::SafeString->new($s); +} + =head2 nget [% nget( 'singular', 'plural', $number ) %] |