From 5fd42832d131f7db86c2d7625083f58d19d4372a Mon Sep 17 00:00:00 2001 From: Eitan Adler Date: Sat, 15 Dec 2012 17:05:45 +0000 Subject: [PATCH] Teach the conversion script about all the nice people that offered to reduce the number of wasted bytes in the world --- Tools/scripts/convert-makefile-header.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/Tools/scripts/convert-makefile-header.pl b/Tools/scripts/convert-makefile-header.pl index 8a97fdde3af2..6569e2478da1 100755 --- a/Tools/scripts/convert-makefile-header.pl +++ b/Tools/scripts/convert-makefile-header.pl @@ -28,6 +28,8 @@ Usage: $bn [OPTION] PORT _ENOUSAGE } +my $nicepeople=".*(avilla@|bapt@|bdrewery@|beat@|eadler@|flo@|flz@|garga@|bsdkaffee@|linimon@|makc@|araujo@|rm@|villa.alberto@).*"; + sub get_creator($) { my $header=shift; my $creator; @@ -99,7 +101,9 @@ MAIN: { my $creator=get_creator(\@header); my $mcom=get_mcom(\@header); if(defined($creator)) { - print $outh "# Created by: $creator\n"; + if ($creator!~m"$nicepeople"i) { + print $outh "# Created by: $creator\n"; + } } else { print STDERR "$mf creator not found. Reverting to RCS string only.\n"; }