FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-28 11:01:59 +00:00
Code Issues Releases Wiki Activity

pre-commit: add MAINTAINER.txt check (Forum #136270)

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@28316 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2023-12-26 14:11:26 +00:00
parent b61d04e473
commit 3698ae2561
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
fhem/contrib/pre-commit
View File

@ -12,7 +12,7 @@ my $svnlook='/usr/bin/svnlook';
my $repos=$ARGV[0]; my $repos=$ARGV[0];
my $txn=$ARGV[1]; my $txn=$ARGV[1];
my $arg="-t $txn"; my $arg="-t $txn";
#my $arg="-r $txn"; # local testing #my $arg="-r $txn"; # local testing: perl pre-commit /var/svn/fhem 28315
my @lang = ("EN", "DE"); my @lang = ("EN", "DE");
my $exitCode = 0; my $exitCode = 0;
use constant TAGS => qw{ul li code b i u table tr td div h4 h3}; use constant TAGS => qw{ul li code b i u table tr td div h4 h3};
@ -172,6 +172,17 @@ foreach my $row (split("\n", $fList)) {
if($tagcount{$tag}); if($tagcount{$tag});
} }
} }
# Check if the file is in the MAINTAINER.txt, #136270
open(MAINT, "$svnlook $arg cat $repos /trunk/fhem/MAINTAINER.txt|") ||
die("Cant svnlook cat MAINTAINER.txt:$!\n");
my $fnd = 0;
while(my $l = <MAINT>) {
$fnd = 1 if($l =~ m,^FHEM/${modNum}_${modName}.pm,)
}
close(MAINT);
err $fName, "FHEM/${modNum}_${modName}.pm not found in MAINTAINER.txt"
if(!$fnd);
} }
exit($exitCode); exit($exitCode);