Commits

Shlomi Fish committed 9384131

Convert images_dir to tempdir().

This was done to solve some CPAN testers failures.

Comments (0)

Files changed (3)

perl/XML-Grammar-ProductsSyndication/Changes

 Revision history for XML::Grammar::ProductsSyndication
 
+0.0401
+        - Convert t/03-dload-imgs.t to use File::Temp's tempdir() instead
+        of a directory under t to solve some test failures.
+
 0.0400  Fri Aug 27 22:39:17 IDT 2010
         - Add support for amazon_sak (Secret Access Key).
 

perl/XML-Grammar-ProductsSyndication/lib/XML/Grammar/ProductsSyndication.pm

 
 =head1 VERSION
 
-Version 0.0400
+Version 0.0401
 
 =cut
 
-our $VERSION = '0.0400';
+our $VERSION = '0.0401';
 
 =head1 SYNOPSIS
 

perl/XML-Grammar-ProductsSyndication/t/03-dload-imgs.t

 use warnings;
 
 use File::Spec;
+use File::Temp qw(tempdir);
 
 use lib File::Spec->catdir(File::Spec->curdir(), "t", "lib");
 
     },
 );
 
-my $images_dir = File::Spec->catdir(File::Spec->curdir(), "t", "output", "images");
+# Fails on some places due to "t" being read-only sometimes.
+#
+# my $images_dir = File::Spec->catdir(File::Spec->curdir(), "t", "output", "images");
+#
+# This should work better.
+my $images_dir = tempdir ( CLEANUP => 1);
 
 sub get_jpgs
 {