Commit db943711187b5e57b90b3fe9f0a810971821b609 - libmodule-build-tiny-perl - Codebase list

Codebase list libmodule-build-tiny-perl / db94371

Skip scripts and shared if not present Leon Timmermans 11 years ago

1 changed file(s) with 2 addition(s) and 2 deletion(s). Raw diff Collapse all Expand all

+2

-2

lib/Module/Build/Tiny.pm less more

54	54	my %opt = @_;
55	55	system $^X, $_ and die "$_ returned $?\n" for find(qr/\.PL$/, 'lib');
56	56	my %modules = map { $_ => catfile('blib', $_) } find(qr/\.p(?:m\|od)$/, 'lib');
57		my %scripts = map { $_ => catfile('blib', $_) } find(qr//, 'script');
58		my %shared = map { $_ => catfile(qw/blib lib auto share dist/, $opt{meta}->name, abs2rel($_, 'share')) } find(qr//, 'share');
	57	my %scripts = -d 'script' ? map { $_ => catfile('blib', $_) } find(qr//, 'script') : ();
	58	my %shared = -d 'share' ? map { $_ => catfile(qw/blib lib auto share dist/, $opt{meta}->name, abs2rel($_, 'share')) } find(qr//, 'share') : ();
59	59	pm_to_blib({ %modules, %scripts, %shared }, catdir(qw/blib lib auto/));
60	60	make_executable($_) for values %scripts;
61	61	mkpath(catdir(qw/blib arch/), $opt{verbose});