Revision 60c0c579
Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt
| SL/Template/Simple.pm | ||
|---|---|---|
|
|
||
|
my $not = $1;
|
||
|
my $var = $2;
|
||
|
my $comparison = $3; # Optionaler Match um $4..$8
|
||
|
my $operator_neg = $4; # '=' oder '!' oder undef, wenn kein Vergleich erkannt
|
||
|
my $operator_type = $5; # '=' oder '~' für Stringvergleich oder Regex
|
||
|
my $quoted_word = $7; # nur gültig, wenn quoted string angegeben (siehe unten); dann "value" aus <%if var == "value" %>
|
||
| ... | ... | |
|
substr($$contents, 0, length($&)) = "";
|
||
|
|
||
|
my $block;
|
||
|
($block, $$contents) = $self->find_end($$contents, 0, $var, $not);
|
||
|
($block, $$contents) = $self->find_end($$contents, 0, "$var $comparison", $not);
|
||
|
if (!$block) {
|
||
|
$self->{"error"} = "Unclosed $self->{tag_start}if$self->{tag_end}." unless ($self->{"error"});
|
||
|
$main::lxdebug->leave_sub();
|
||
Auch abrufbar als: Unified diff
Templates: Auswertung des "else"-Teils gefixt, wenn "if"-Teil Variablenvergleiche enthält