Revision 64dc1c9b
Von Bernd Bleßmann vor etwa 2 Jahren hinzugefügt
SL/Locale.pm | ||
---|---|---|
$sub_name = first { defined(&{ "::${_}" }) } @{ $self->{texts_reverse}->{$text_rev} } if $self->{texts_reverse}->{$text_rev};
|
||
$sub_name ||= $text_rev if ($text_rev =~ m/^[a-z][a-z0-9_]+$/) && defined &{ "::${text_rev}" };
|
||
|
||
$main::form->error("$text not defined in locale/$self->{countrycode}/all") if !$sub_name;
|
||
$main::form->error($self->quote_special_chars('HTML', "$text not defined in locale/$self->{countrycode}/all")) if !$sub_name;
|
||
|
||
$main::lxdebug->leave_sub();
|
||
|
Auch abrufbar als: Unified diff
S:Locale: findsub: XSS