databind
parent
fe00b307ab
commit
61a191e15d
|
@ -358,7 +358,7 @@ sub compile
|
|||
}
|
||||
|
||||
# удаляем комментарии <!--# ... -->
|
||||
$code =~ s/\s*\Q$bc\E\s*#.*?\Q$ec\E//gos;
|
||||
$code =~ s/\s*\Q$bc\E[ \t]*#.*?\Q$ec\E//gos;
|
||||
$code =~ s/(?:^|\n)[ \t\r]*(\Q$bc\E\s*[a-z]+(\s+.*)?\Q$ec\E)/$1/giso;
|
||||
|
||||
$self->{blocks} = [];
|
||||
|
|
Loading…
Reference in New Issue