X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FTemplate%2FSimple.pm;h=d7a7c3525d7525a56d16e0cfcab817b12588e58c;hb=5547891f42ef3b13d477eba65bb0537ece1d703c;hp=3baeaac2d32a3d8bce59abcc2762fb8aa09342c2;hpb=0fba3edda47fca21bedb14eb88e0f5f8d983bb38;p=kivitendo-erp.git diff --git a/SL/Template/Simple.pm b/SL/Template/Simple.pm index 3baeaac2d..d7a7c3525 100644 --- a/SL/Template/Simple.pm +++ b/SL/Template/Simple.pm @@ -163,6 +163,7 @@ sub _parse_block_if { 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" %> @@ -173,7 +174,7 @@ sub _parse_block_if { 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();