From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Wed, 18 Apr 2012 13:46:20 +0000 (-0500)
Subject: add missing catfile so tests can run on win32
X-Git-Tag: v0.08197~28
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0c3c40a2c15a5c721f6b5f38246d0d350b565ce1;p=dbsrgits%2FDBIx-Class.git

add missing catfile so tests can run on win32
---

diff --git a/t/lib/DBICTest.pm b/t/lib/DBICTest.pm
index 58f5cca..8b36d10 100644
--- a/t/lib/DBICTest.pm
+++ b/t/lib/DBICTest.pm
@@ -60,7 +60,7 @@ our ($global_lock_fh, $global_exclusive_lock);
 sub import {
     my $self = shift;
 
-    my $lockpath = File::Spec->tmpdir . '/.dbictest_global.lock';
+    my $lockpath = File::Spec->catfile(File::Spec->tmpdir, '.dbictest_global.lock');
 
     {
       my $u = local_umask(0); # so that the file opens as 666, and any user can lock