[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 <<EOD unless DBICTest::RunMode->is_ci;


$authorcount contributors made this library what it is today


Distinguished patrons:
  * ( 2014 ~ 2015 ) Henry Van Styn, creator of http://p3rl.org/RapidApp


EOD

# looks funny if we do it before stuff
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
3884539f	14	diag <<EOD unless DBICTest::RunMode->is_ci;
245e3f5d	15
3884539f	16
	17
	18	$authorcount contributors made this library what it is today
	19
	20
	21	Distinguished patrons:
	22	* ( 2014 ~ 2015 ) Henry Van Styn, creator of http://p3rl.org/RapidApp
	23
	24
	25	EOD
	26
	27	# looks funny if we do it before stuff
245e3f5d	28	ok 1;