This reverts commit
d8153bec650b92d2cd68449a148c393c51e877e9.
The fix made it possible to continue q{} constructs across
lines but, it also allowed "q\n" to continue as well which
is not valid. Reverting until further investigation can be
made.
$line .= "\n;;";
my $document = PPI::Document->new(\$line);
- unless ( defined($document) ) {
- die "PPI failed to parse document '$line'\n";
- }
+ return 0 if !defined($document);
# adding ";" to a complete document adds a PPI::Statement::Null. we added a ;;
# so if it doesn't end in null then there's probably something that's
# incomplete
- unless ( $document->child(-1)->isa('PPI::Statement::Null') ) {
- return 1;
- }
+ return 0 if $document->child(-1)->isa('PPI::Statement::Null');
# this could use more logic, such as returning 1 on s/foo/ba<Enter>
my $unfinished_structure = sub