mirror/curl
2
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2025-02-23 15:10:03 +08:00
Code Issues Packages Projects Releases Wiki Activity

managen: fix blank line detection

Browse Source 
Follow-up to d14a53eea7 which ruined the output somewhat.

Closes #14017
This commit is contained in:
Daniel Stenberg 2024-06-25 16:28:33 +02:00
parent 473ec8a05d
commit c1845dc0e2
No known key found for this signature in database
GPG Key ID: 5CC908FDB71E12C2
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
scripts/managen
View File

@ -276,13 +276,13 @@ sub render {
my $top = ($line == 1); my $top = ($line == 1);
my $quote; my $quote;
my $level; my $level;
my $blankline; my $finalblank;
$start = 0; $start = 0;
while(<$fh>) { while(<$fh>) {
my $d = $_; my $d = $_;
$line++; $line++;
$blankline = ($d eq "\n"); $finalblank = ($d eq "\n");
if($d =~ /^\.(SH|BR|IP|B)/) { if($d =~ /^\.(SH|BR|IP|B)/) {
print STDERR "$f:$line:1:ERROR: nroff instruction in input: \".$1\"\n"; print STDERR "$f:$line:1:ERROR: nroff instruction in input: \".$1\"\n";
return 4; return 4;
@ -450,7 +450,7 @@ sub render {
$header = 0; $header = 0;
} }
if($blankline) { if($finalblank) {
print STDERR "$f:$line:1:ERROR: trailing blank line\n"; print STDERR "$f:$line:1:ERROR: trailing blank line\n";
exit 3; exit 3;
} }