databind
vitalif 2009-12-19 23:26:09 +00:00 committed by Vitaliy Filippov
parent fe00b307ab
commit 61a191e15d
1 changed files with 1 additions and 1 deletions

View File

@ -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} = [];