Signed-off-by: Laine Stump <laine@xxxxxxxxx> --- Build.PL | 104 +++++++++++++++++++++++++++++++-------------------------------- 1 file changed, 52 insertions(+), 52 deletions(-) diff --git a/Build.PL b/Build.PL index 63785a5..9593021 100644 --- a/Build.PL +++ b/Build.PL @@ -27,11 +27,11 @@ sub process_pkgdata_files { my $wanted = sub { my $dir = $File::Find::dir; my $name = $File::Find::name; - if (-d) { - $tck_dirs{$name} = []; - } elsif (-f && /\.(t|sh|fwall|xml|dat)$/) { - push @{$tck_dirs{$dir}}, $name; - } + if (-d) { + $tck_dirs{$name} = []; + } elsif (-f && /\.(t|sh|fwall|xml|dat)$/) { + push @{$tck_dirs{$dir}}, $name; + } }; find($wanted, 'scripts'); @@ -40,19 +40,19 @@ sub process_pkgdata_files { File::Path::mkpath($tck_dir); foreach my $srcdir (keys %tck_dirs) { - next unless @{$tck_dirs{$srcdir}}; + next unless @{$tck_dirs{$srcdir}}; - my $dstdir = $srcdir; - $dstdir =~ s,scripts/,,; + my $dstdir = $srcdir; + $dstdir =~ s,scripts/,,; - $dstdir = File::Spec->catdir($self->blib, 'pkgdata', $dstdir); - File::Path::mkpath($dstdir); + $dstdir = File::Spec->catdir($self->blib, 'pkgdata', $dstdir); + File::Path::mkpath($dstdir); - foreach my $file (@{$tck_dirs{$srcdir}}) { - my $result = $self->copy_if_modified(from => $file, - to_dir => $dstdir, - flatten => 1); - } + foreach my $file (@{$tck_dirs{$srcdir}}) { + my $result = $self->copy_if_modified(from => $file, + to_dir => $dstdir, + flatten => 1); + } } } @@ -64,52 +64,52 @@ my $b = $class->new( dist_author => 'Daniel Berrange <dan@xxxxxxxxxxxx>', dist_abstract => 'libvirt Technology Compatability Kit', requires => { - 'perl' => '5.8.0', - 'accessors' => 0, - 'App::Prove' => '3.11', - 'Config::Record' => '1.0.0', - 'Cwd' => 0, - 'Digest' => 0, - 'Digest::MD5' => 0, - 'File::Copy' => 0, - 'File::Path' => 0, - 'File::Slurp' => 0, - 'File::Spec::Functions' => 0, - 'LWP::UserAgent' => 0, - 'IO::String' => 0, - 'IO::Uncompress::Gunzip' => 0, - 'IO::Uncompress::Bunzip2' => 0, - 'TAP::Formatter::HTML' => 0, - 'TAP::Formatter::JUnit' => 0, - 'TAP::Harness' => 3.11, - 'TAP::Harness::Archive' => 0, - 'Test::Exception' => 0, - 'Test::Builder' => 0, - 'Test::More' => 0, - 'Sub::Uplevel' => 0, - 'Sys::Virt' => '0.2.0', - 'XML::Twig' => 0, - 'XML::Writer' => 0, - 'XML::XPath' => 0, + 'perl' => '5.8.0', + 'accessors' => 0, + 'App::Prove' => '3.11', + 'Config::Record' => '1.0.0', + 'Cwd' => 0, + 'Digest' => 0, + 'Digest::MD5' => 0, + 'File::Copy' => 0, + 'File::Path' => 0, + 'File::Slurp' => 0, + 'File::Spec::Functions' => 0, + 'LWP::UserAgent' => 0, + 'IO::String' => 0, + 'IO::Uncompress::Gunzip' => 0, + 'IO::Uncompress::Bunzip2' => 0, + 'TAP::Formatter::HTML' => 0, + 'TAP::Formatter::JUnit' => 0, + 'TAP::Harness' => 3.11, + 'TAP::Harness::Archive' => 0, + 'Test::Exception' => 0, + 'Test::Builder' => 0, + 'Test::More' => 0, + 'Sub::Uplevel' => 0, + 'Sys::Virt' => '0.2.0', + 'XML::Twig' => 0, + 'XML::Writer' => 0, + 'XML::XPath' => 0, }, build_requires => { - 'Test::Pod' => '0', - 'Test::Pod::Coverage' => '0', + 'Test::Pod' => '0', + 'Test::Pod::Coverage' => '0', }, script_files => [ - "bin/libvirt-tck", + "bin/libvirt-tck", ], create_makefile_pl => 'passthrough', meta_add => { - resources => { - license => "http://www.gnu.org/licenses/gpl.html", - homepage => "http://libvirt.org/", - repository => "http://libvirt.org/hg/libvirt-tck", - MailingList => "http://www.redhat.com/mailman/listinfo/libvir-list", - }, + resources => { + license => "http://www.gnu.org/licenses/gpl.html", + homepage => "http://libvirt.org/", + repository => "http://libvirt.org/hg/libvirt-tck", + MailingList => "http://www.redhat.com/mailman/listinfo/libvir-list", + }, }, conf_files => { - 'conf/default.cfg' => 'conf/default.cfg', + 'conf/default.cfg' => 'conf/default.cfg', }, PL_files => [ 'perl-Sys-Virt-TCK.spec.PL' ], ); -- 2.14.3 -- libvir-list mailing list libvir-list@xxxxxxxxxx https://www.redhat.com/mailman/listinfo/libvir-list