Permalink
Browse files

fix problems with -r test and testing on Cygwin

  • Loading branch information...
1 parent 26e975b commit 0eafa057250f79d0765f6fef1111fc670198134a @rjbs committed Aug 21, 2007
Showing with 15 additions and 4 deletions.
  1. +3 −0 Changes
  2. +2 −2 lib/Config/INI/Reader.pm
  3. +2 −2 lib/Config/INI/Writer.pm
  4. +4 −0 t/reader-err.t
  5. +4 −0 t/writer.t
View
@@ -1,5 +1,8 @@
Changelog for Config-INI-Reader
+0.007 2007-08-21
+ use filetest.pm in tests to avoid -r-related failures on Cygwin
+
0.006 2007-08-15
use -T instead of -t in tests; -t is a perl 5.008 feature
View
@@ -9,11 +9,11 @@ Config::INI::Reader - a subclassable .ini-file parser
=head1 VERSION
-version 0.006
+version 0.007
=cut
-$Config::INI::Reader::VERSION = '0.006';
+$Config::INI::Reader::VERSION = '0.007';
=head1 SYNOPSIS
View
@@ -9,11 +9,11 @@ Config::INI::Writer - a subclassable .ini-file emitter
=head1 VERSION
-version 0.006
+version 0.007
=cut
-$Config::INI::Writer::VERSION = '0.006';
+$Config::INI::Writer::VERSION = '0.007';
=head1 SYNOPSIS
View
@@ -33,6 +33,10 @@ like($@, qr/no filename specified/i, 'read_file without args');
SKIP: {
eval "require File::Temp;" or skip "File::Temp not available", 1;
+ # This could probably be limited to being required for Cygwin.
+ eval "require filetest;" or skip "filetest.pm not available", 1;
+ filetest->import('access');
+
my ($fh, $fn) = File::Temp::tempfile(UNLINK => 1);
close $fh;
View
@@ -133,6 +133,10 @@ like($@, qr/multiple/, "you can't set property B in section A more than once");
SKIP: {
eval "require File::Temp;" or skip "File::Temp not availabe", 3;
+ # This could probably be limited to being required for Cygwin.
+ eval "require filetest;" or skip "filetest.pm not available", 1;
+ filetest->import('access');
+
my ($fh, $fn) = File::Temp::tempfile(UNLINK => 1);
close $fh;
unlink $fn;

0 comments on commit 0eafa05

Please sign in to comment.