[packages/ack.git] / ack-interactive-tests.patch

--- t/Util.pm.orig	2013-04-23 16:50:35.000000000 +0100
+++ t/Util.pm	2013-04-23 16:51:34.000000000 +0100
@@ -403,7 +403,7 @@
 BEGIN {
     my $has_io_pty = eval {
         require IO::Pty;
-        1;
+        !exists($ENV{RUN_INTERACTIVE}) || $ENV{RUN_INTERACTIVE};
     };
 
     sub has_io_pty {
Commit	Line	Data
81f268ee KK	1	--- t/Util.pm.orig 2013-04-23 16:50:35.000000000 +0100
	2	+++ t/Util.pm 2013-04-23 16:51:34.000000000 +0100
	3	@@ -403,7 +403,7 @@
	4	BEGIN {
	5	my $has_io_pty = eval {
	6	require IO::Pty;
	7	- 1;
	8	+ !exists($ENV{RUN_INTERACTIVE}) \|\| $ENV{RUN_INTERACTIVE};
	9	};
	10
	11	sub has_io_pty {