diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2020-02-03 11:00:22 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2020-02-03 11:00:22 +0000 |
| commit | 6a81fb1616971c1ceda16e2bb7c14e8341c1421c (patch) | |
| tree | d41b7fc35019aad2459628290cfe257746086844 /perllib/FixMyStreet/Template.pm | |
| parent | 97031d8723b320e0233fcefdca08439fc79f5578 (diff) | |
| parent | 373383e84f06fe900fdb78dd651fec4a9f2b5ce8 (diff) | |
Merge remote-tracking branch 'origin/2667-improve-mobile-try-again'
Diffstat (limited to 'perllib/FixMyStreet/Template.pm')
| -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 ) %] |