X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/927ead507db9b154a18dc5d62fb89feb34aeb76c..9796c91fd60477b461fa5cdfa9292fdb9e86ef02:/SL/Template/Plugin/L.pm diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm index f776af85c..844c88dd2 100644 --- 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] } : @_; }