resolve test directory

File::Spec->tmpdir may return a symlink as well, so
c41c902ca6fd9f8e352267be64d (test in directories provided by Test::Spec)
still didn't fix darwin (in all cases).

The darwin I tested on gave a tmpdir like:
	/var/folders/OJ/OJjGh2I+HBOinZB8Re8QVU+++TI/-Tmp-
but cpantesters machines are still using a symlinked /tmp.

Use Cwd to find the real path name, hopefully fixing all remaining cases.

diff --git a/META.yml b/META.yml
index e7506a9475bdc71ba3043d0de33872462b2342ba..7fd09c18d94c5a48f8d90d6f5d097d7870b2f174 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -1,7 +1,7 @@
 --- #YAML:1.0
 name: PLP
 abstract: Perl in HTML pages
-version: 3.22_02
+version: 3.22_03
 version_from: PLP.pm
 author:
     - Mischa POSLAWSKY <perl@shiar.org>

diff --git a/Makefile.PL b/Makefile.PL
index dc01c663e5474dbaf365c33d9a8386126c73a75f..6a9b81936a7c58f3c1daed908c4e0531bccde6c5 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -8,7 +8,7 @@ use ExtUtils::MakeMaker;
 
 WriteMakefile(
        NAME          => 'PLP',
-       VERSION_FROM  => 'lib/PLP.pm',
+       VERSION       => '3.22_03',
        PREREQ_PM     => {},
        ABSTRACT_FROM => 'lib/PLP.pm',
        NO_META       => 1,

diff --git a/t/50-cgi.t b/t/50-cgi.t
index 7ef973b5205151c38715cc5cdbd41a4e507a9ac7..df341ff61a41c75f940d377b40e6a2d0d677c852 100644 (file)
--- a/t/50-cgi.t
+++ b/t/50-cgi.t
@@ -1,6 +1,7 @@
 use strict;
 use warnings;
 
+use Cwd;
 use File::Spec;
 use Test::More;
 
@@ -14,7 +15,7 @@ require_ok('PLP::Backend::CGI') or BAIL_OUT();
 $PLP::use_cache = 0 if $PLP::use_cache;
 #TODO: caching on (change file names)
 
-my $base = File::Spec->tmpdir || File::Spec->curdir;
+my $base = Cwd::abs_path(File::Spec->tmpdir || File::Spec->curdir);
 -w $base or BAIL_OUT("$base not writable");
 my $testfile = 'testfile.plp';
 not -f "$base/$testfile" or BAIL_OUT("$testfile exists");