From: Tony Cook <tony@develop=help.com>
Date: Tue, 14 Aug 2007 05:01:22 +0000 (+0000)
Subject: 5.005_03 compatible use of mkdir
X-Git-Tag: Imager-0.60~12
X-Git-Url: http://git.imager.perl.org/imager.git/commitdiff_plain/63536243b95fef9c62f38243c6562ced108e723c?ds=sidebyside

5.005_03 compatible use of mkdir
---

diff --git a/SGI/t/10read.t b/SGI/t/10read.t
index 875bcffd..f5f2abe7 100644
--- a/SGI/t/10read.t
+++ b/SGI/t/10read.t
@@ -4,7 +4,7 @@ use Imager;
 use Imager::Test qw(is_image is_color3);
 use Test::More tests => 103;
 
--d 'testout' or mkdir 'testout';
+-d 'testout' or mkdir 'testout', 0777;
 
 Imager::init_log('testout/10read.log', 2);
 
diff --git a/SGI/t/20write.t b/SGI/t/20write.t
index 7a140c3f..1ca6aef0 100644
--- a/SGI/t/20write.t
+++ b/SGI/t/20write.t
@@ -5,7 +5,7 @@ use Test::More tests => 51;
 use Imager::Test qw(test_image test_image_16 is_image);
 use IO::Seekable;
 
--d 'testout' or mkdir 'testout';
+-d 'testout' or mkdir 'testout', 0777;
 
 Imager::init_log('testout/20write.log', 2);