f005593dc3
Have all of the scripts invoked by "make check-docs" emit their output on STDERR. This does not currently matter due to the way we're invoking them, but will in a subsequent change. It's a good idea to do this in any case for consistency with other tools we invoke. Signed-off-by: Ævar Arnfjörð Bjarmason <avarab@gmail.com> Signed-off-by: Junio C Hamano <gitster@pobox.com>
25 lines
380 B
Perl
Executable File
25 lines
380 B
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
my $exit_code = 0;
|
|
sub report {
|
|
my ($target, $msg) = @_;
|
|
print STDERR "error: $target: $msg\n";
|
|
$exit_code = 1;
|
|
}
|
|
|
|
local $/;
|
|
while (my $slurp = <>) {
|
|
report($ARGV, "has no 'Part of the linkgit:git[1] suite' end blurb")
|
|
unless $slurp =~ m[
|
|
^GIT\n
|
|
---\n
|
|
\QPart of the linkgit:git[1] suite\E \n
|
|
\z
|
|
]mx;
|
|
}
|
|
|
|
exit $exit_code;
|