[dbsrgits/DBIx-Class.git] / t / zzzzzzz_authors.t

use warnings;
use strict;

use Test::More 'no_plan';
use lib 't/lib';
use DBICTest::RunMode;

my $authorcount = scalar do {
  open (my $fh, '<', 'AUTHORS') or die "Unable to open AUTHORS - can't happen: $!\n";
  map { chomp; ( ( ! $_ or $_ =~ /^\s*\#/ ) ? () : $_ ) } <$fh>;
} or die "Known AUTHORS file seems empty... can't happen...";

# do not announce anything under ci - we are watching for STDERR silence
diag "\n\n$authorcount contributors made this library what it is today\n\n"
  unless DBICTest::RunMode->is_ci;

ok 1;
Commit	Line	Data
245e3f5d	1	use warnings;
	2	use strict;
	3
	4	use Test::More 'no_plan';
81b29c8d	5	use lib 't/lib';
81b29c8d	6	use DBICTest::RunMode;
245e3f5d	7
	8	my $authorcount = scalar do {
	9	open (my $fh, '<', 'AUTHORS') or die "Unable to open AUTHORS - can't happen: $!\n";
	10	map { chomp; ( ( ! $_ or $_ =~ /^\s*\#/ ) ? () : $_ ) } <$fh>;
	11	} or die "Known AUTHORS file seems empty... can't happen...";
	12
81b29c8d	13	# do not announce anything under ci - we are watching for STDERR silence
245e3f5d	14	diag "\n\n$authorcount contributors made this library what it is today\n\n"
81b29c8d	15	unless DBICTest::RunMode->is_ci;
245e3f5d	16
245e3f5d	17	ok 1;