X-Git-Url: http://git.shiar.net/perl/plp/.git/blobdiff_plain/f90fb1e2e61e6e07843ae799434851d879f94148..401e77fcf4bf3d4a36d603b54cd381318e946cb7:/t/50-cgi.t

diff --git a/t/50-cgi.t b/t/50-cgi.t
index 7ef973b..df341ff 100644
--- 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");