From 6598b29c2cd23efd558e8b02ccffb8b3ba7c2279 Mon Sep 17 00:00:00 2001 From: Graham Ollis Date: Fri, 21 Mar 2014 14:58:30 -0400 Subject: [PATCH] update release tests --- xt/release/version.t | 36 ++++++++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 xt/release/version.t diff --git a/xt/release/version.t b/xt/release/version.t new file mode 100644 index 0000000..1ff0840 --- /dev/null +++ b/xt/release/version.t @@ -0,0 +1,36 @@ +use strict; +use warnings; +use Test::More; +use FindBin (); +BEGIN { + plan skip_all => "test requires Test::Version 1.001001" + unless eval q{ use Test::Version 1.001001 qw( version_all_ok ), { has_version => 1 }; 1 }; + plan skip_all => "test requires Path::Class" + unless eval q{ use Path::Class qw( file dir ); 1 }; + plan skip_all => 'test requires YAML' + unless eval q{ use YAML; 1; }; +} + +use YAML qw( LoadFile ); +use FindBin; +use File::Spec; + +plan skip_all => "test not built yet (run dzil test)" + unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL') + || -e dir( $FindBin::Bin)->parent->parent->file('Build.PL'); + +my $config_filename = File::Spec->catfile( + $FindBin::Bin, 'release.yml' +); + +my $config; +$config = LoadFile($config_filename) + if -r $config_filename; + +if($config->{version}->{dir}) +{ + note "using dir " . $config->{version}->{dir} +} + +version_all_ok($config->{version}->{dir} ? ($config->{version}->{dir}) : ()); +done_testing;