refactor; rm old cruft

diff --git a/fortune-mod/tests/t/lib/FortTestInst.pm b/fortune-mod/tests/t/lib/FortTestInst.pm
index a6079002a9c092544df5f93ea62b6e7b53b946c6..3a56b6d533750ef4beefcfa33a308c3e50b45bc4 100644 (file)
--- a/fortune-mod/tests/t/lib/FortTestInst.pm
+++ b/fortune-mod/tests/t/lib/FortTestInst.pm
@@ -3,11 +3,10 @@ package FortTestInst;
 use strict;
 use warnings;
 
-use Path::Tiny qw/ path tempdir tempfile cwd /;
-use File::Path qw/mkpath rmtree/;
+use Path::Tiny qw/ cwd /;
+use File::Path qw/ mkpath rmtree /;
 
 my $IS_WIN = ( $^O eq "MSWin32" );
-my $SEP    = $IS_WIN ? "\\"    : '/';
 my $MAKE   = $IS_WIN ? 'gmake' : 'make';
 
 sub do_system
@@ -54,7 +53,6 @@ sub install
             ]
         }
     );
-    do_system( { cmd => [$MAKE] } );
     do_system( { cmd => [ $MAKE, 'install', ] } );
     chdir($cwd);
 

diff --git a/fortune-mod/tests/t/test-fortune-m.t b/fortune-mod/tests/t/test-fortune-m.t
index af5dbe0e55816c0a9084a621d806981e9b4087a7..d06f6fffcefcd6063ffef01cab4836426d1f8310 100644 (file)
--- a/fortune-mod/tests/t/test-fortune-m.t
+++ b/fortune-mod/tests/t/test-fortune-m.t
@@ -11,7 +11,6 @@ use Test::More tests => 3;
 
 {
     my $inst_dir = FortTestInst::install("fortune-m");
-    my $IS_WIN   = ( $^O eq "MSWin32" );
     my @cmd      = ( $inst_dir->child( 'games', 'fortune' ), '-m', 'giants' );
 
     print "Running [@cmd]\n";
@@ -25,7 +24,6 @@ use Test::More tests => 3;
 
 {
     my $inst_dir = FortTestInst::install("fortune-m");
-    my $IS_WIN   = ( $^O eq "MSWin32" );
     my @cmd = ( $inst_dir->child( 'games', 'fortune' ), '-m', '"wet paint"' );
 
     print "Running [@cmd]\n";