appveyor fix 6: win32 paths

diff --git a/fortune-mod/tests/t/lib/FortTestInst.pm b/fortune-mod/tests/t/lib/FortTestInst.pm
index 752f19aac88351bbbf1600829710b043cd37597b..0f0e125d3bf602de4d91db21c996e59d329e2bb4 100644 (file)
--- a/fortune-mod/tests/t/lib/FortTestInst.pm
+++ b/fortune-mod/tests/t/lib/FortTestInst.pm
@@ -3,8 +3,8 @@ package FortTestInst;
 use strict;
 use warnings;
 
+use Path::Tiny qw/ path tempdir tempfile cwd /;
 use File::Path qw/mkpath rmtree/;
-use Cwd qw/getcwd/;
 
 my $IS_WIN = ( $^O eq "MSWin32" );
 my $SEP    = $IS_WIN ? "\\" : '/';
@@ -25,9 +25,9 @@ sub do_system
 sub install
 {
     my ($basepath) = @_;
-    my $cwd        = getcwd();
-    my $build_dir  = "$cwd/$basepath-build-dir";
-    my $inst_dir   = "$cwd/$basepath-INST_DIR";
+    my $cwd        = cwd->absolute;
+    my $build_dir  = $cwd->child("$basepath-build-dir");
+    my $inst_dir   = $cwd->child("$basepath-INST_DIR");
     rmtree( $build_dir, 0, 0 );
     rmtree( $inst_dir,  0, 0 );
     mkpath($build_dir);

diff --git a/fortune-mod/tests/t/test-fortune-o-rot.t b/fortune-mod/tests/t/test-fortune-o-rot.t
index ef3ce8567d4c43599c90caae6a45d4633b40b925..29b6c7cafa3cf0ee16c0106a033b32e5476bed6f 100644 (file)
--- a/fortune-mod/tests/t/test-fortune-o-rot.t
+++ b/fortune-mod/tests/t/test-fortune-o-rot.t
@@ -7,6 +7,8 @@
 use strict;
 use warnings;
 
+use Path::Tiny qw/ path tempdir tempfile cwd /;
+
 use FindBin;
 use lib "$FindBin::Bin/lib";
 use FortTestInst ();
@@ -15,7 +17,8 @@ use Test::More tests => 1;
 {
     my $inst_dir = FortTestInst::install("fortune-o-rot");
     local $ENV{FORTUNE_MOD_RAND_HARD_CODED_VALS} = 240;
-    my $text = `$inst_dir/games/fortune -o`;
+    my $inst_bin = $inst_dir->child( "games", "fortune" );
+    my $text     = `$inst_bin -o`;
 
     # TEST
     like( $text, qr/\A"Prayer/, 'fortune -o was not rotated' );