From 7ad87f808fc215c9442d1c2745132714b899eaaf Mon Sep 17 00:00:00 2001 From: joy <> Date: Thu, 5 Oct 2000 20:02:36 -0800 Subject: [PATCH] [project @ 2000-10-05 21:02:36 by joy] skip empty lines and lines containing just whitespace in the Maintainers file --- scripts/process.in | 4 +++- scripts/service.in | 4 +++- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/scripts/process.in b/scripts/process.in index 4caf91e8..7ad81570 100755 --- a/scripts/process.in +++ b/scripts/process.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: process.in,v 1.12 2000/09/29 22:00:27 joy Exp $ +# $Id: process.in,v 1.13 2000/10/05 21:02:36 joy Exp $ # # Usage: process nn # Temps: incoming/Pnn @@ -853,6 +853,8 @@ sub checkmaintainers { return if !length($s_package); open(MAINT,"$gMaintainerFile") || die &quit("maintainers open: $!"); while () { + m/^\n$/ && next; + m/^\s*$/ && next; m/^(\S+)\s+(\S.*\S)\n$/ || &quit("maintainers bogus \`$_'"); $a= $1; $b= $2; $a =~ y/A-Z/a-z/; $maintainerof{$1}= $2; diff --git a/scripts/service.in b/scripts/service.in index 9f96c12c..0ae6fa7f 100755 --- a/scripts/service.in +++ b/scripts/service.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -w -# $Id: service.in,v 1.13 2000/10/02 15:52:22 joy Exp $ +# $Id: service.in,v 1.14 2000/10/05 21:02:36 joy Exp $ # # Usage: service .nn # Temps: incoming/P.nn @@ -810,6 +810,8 @@ sub ensuremaintainersloaded { return if $maintainersloaded++; open(MAINT,"$gMaintainerFile") || die &quit("maintainers open: $!"); while () { + m/^\n$/ && next; + m/^\s*$/ && next; m/^(\S+)\s+(\S.*\S)\n$/ || &quit("maintainers bogus \`$_'"); $a= $1; $b= $2; $a =~ y/A-Z/a-z/; $maintainerof{$1}= $2; -- 2.39.5