| @@ -1,13 +1,15 @@ | | | @@ -1,13 +1,15 @@ |
1 | $NetBSD: patch-aa,v 1.1.1.1 2009/10/11 09:37:45 wiz Exp $ | | 1 | $NetBSD: patch-aa,v 1.2 2010/09/12 11:17:07 wiz Exp $ |
| | | 2 | |
| | | 3 | Remove interactivity. |
2 | | | 4 | |
3 | --- Makefile.PL.orig 2009-07-07 12:02:11.000000000 +0000 | | 5 | --- Makefile.PL.orig 2009-07-07 12:02:11.000000000 +0000 |
4 | +++ Makefile.PL | | 6 | +++ Makefile.PL |
5 | @@ -2,7 +2,7 @@ use ExtUtils::MakeMaker; | | 7 | @@ -2,7 +2,7 @@ use ExtUtils::MakeMaker; |
6 | | | 8 | |
7 | use strict; | | 9 | use strict; |
8 | | | 10 | |
9 | -my $online_tests = ExtUtils::MakeMaker::prompt('Do you want to perform online tests during "make test" phase?', 'no') =~ /^\s*(y)/i; | | 11 | -my $online_tests = ExtUtils::MakeMaker::prompt('Do you want to perform online tests during "make test" phase?', 'no') =~ /^\s*(y)/i; |
10 | +my $online_tests = ''; | | 12 | +my $online_tests = ''; |
11 | my $tests = join ' ', glob ($online_tests ? 't/0*.t t/m*.t' : 't/0*.t'); | | 13 | my $tests = join ' ', glob ($online_tests ? 't/0*.t t/m*.t' : 't/0*.t'); |
12 | | | 14 | |
13 | if($online_tests) { | | 15 | if($online_tests) { |