JavaScript-String-Escaping

[mfinanz.git] / SL / Template / Plugin / L.pm

diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm
index f776af85ca35404591d9ca3141ec811be70a8b83..844c88dd296b914a637cda8fa4224070ecd832e8 100644 (file)
--- a/SL/Template/Plugin/L.pm
+++ b/SL/Template/Plugin/L.pm
@@ -21,6 +21,12 @@ sub _H {
   return $::locale->quote_special_chars('HTML', $string);
 }
 
+sub _J {
+  my $string =  "" . shift;
+  $string    =~ s/\"/\\\"/g;
+  return $string;
+}
+
 sub _hashify {
   return (@_ && (ref($_[0]) eq 'HASH')) ? %{ $_[0] } : @_;
 }