Revision 51d0274d
Von Thomas Heck vor etwa 12 Jahren hinzugefügt
SL/Template/Plugin/L.pm | ||
---|---|---|
28 | 28 |
} |
29 | 29 |
|
30 | 30 |
sub _J { |
31 |
my $string = "" . shift;
|
|
32 |
$string =~ s/\"/\\\"/g;
|
|
31 |
my $string = shift; |
|
32 |
$string =~ s/(\"|\'|\\)/\\$1/g;
|
|
33 | 33 |
return $string; |
34 | 34 |
} |
35 | 35 |
|
Auch abrufbar als: Unified diff
SL::Template::Plugin::L::_J ums escaping von ' und \ erweitert