mirror of
https://github.com/curl/curl.git
synced 2026-05-30 06:57:28 +03:00
managen: fix blank line detection
Follow-up to d14a53eea7 which ruined the output somewhat.
Closes #14017
This commit is contained in:
parent
473ec8a05d
commit
c1845dc0e2
1 changed files with 3 additions and 3 deletions
|
|
@ -276,13 +276,13 @@ sub render {
|
|||
my $top = ($line == 1);
|
||||
my $quote;
|
||||
my $level;
|
||||
my $blankline;
|
||||
my $finalblank;
|
||||
$start = 0;
|
||||
|
||||
while(<$fh>) {
|
||||
my $d = $_;
|
||||
$line++;
|
||||
$blankline = ($d eq "\n");
|
||||
$finalblank = ($d eq "\n");
|
||||
if($d =~ /^\.(SH|BR|IP|B)/) {
|
||||
print STDERR "$f:$line:1:ERROR: nroff instruction in input: \".$1\"\n";
|
||||
return 4;
|
||||
|
|
@ -450,7 +450,7 @@ sub render {
|
|||
$header = 0;
|
||||
|
||||
}
|
||||
if($blankline) {
|
||||
if($finalblank) {
|
||||
print STDERR "$f:$line:1:ERROR: trailing blank line\n";
|
||||
exit 3;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue