From ab1e22594c6e6d7f3f038d69d3eadf6e1826cef3 Mon Sep 17 00:00:00 2001 From: Gabor Szabo Date: Sun, 20 Nov 2011 11:46:15 +0200 Subject: [PATCH] fix testing when duplicate files are not included --- MANIFEST.SKIP | 12 ++++++------ script/dwimmer_setup.pl | 6 ++++-- 2 files changed, 10 insertions(+), 8 deletions(-) diff --git a/MANIFEST.SKIP b/MANIFEST.SKIP index a2f0c66..5c2315e 100644 --- a/MANIFEST.SKIP +++ b/MANIFEST.SKIP @@ -49,12 +49,12 @@ MYMETA\.(?:yml|yaml|json)$ SETUP.bat # copied to the share/ directory -#^public\b -#^schema\b -#^views\b -#^environments\b -#^bin\n -#^config.yml +^public\b +^schema\b +^views\b +^environments\b +^bin\n +^config.yml # need to include the share directory as well as apparently diff --git a/script/dwimmer_setup.pl b/script/dwimmer_setup.pl index 96e5590..b96e585 100644 --- a/script/dwimmer_setup.pl +++ b/script/dwimmer_setup.pl @@ -72,9 +72,11 @@ my $dist_dir; # When we are in the development environment (have .git) set this to the root directory -# When we are in the installation environment (have Makefile.PL) set this to the root directory -if (grep { -e File::Spec->catdir(dirname(dirname abs_path($0)) , $_) } ('.git', 'Makefile.PL')) { +# When we are in the installation environment (have Makefile.PL) set this to the share/ subdirectory +if (-e File::Spec->catdir(dirname(dirname abs_path($0)) , '.git') ) { $dist_dir = dirname(dirname abs_path($0)) +} elsif (-e File::Spec->catdir(dirname(dirname abs_path($0)) , 'Makefile.PL') ) { + $dist_dir = File::Spec->catdir( dirname(dirname abs_path($0)), 'share' ); } else { $dist_dir = File::ShareDir::dist_dir('Dwimmer'); }