0001-close-STDIN-to-pass-01_example.t.patch

From fa0bb8f87527722fd92f0205a2aa01fdeb40c68b Mon Sep 17 00:00:00 2001
From: Daisuke Murase <[email protected]>
Date: Thu, 10 May 2012 10:26:40 +0900
Subject: [PATCH] close STDIN to pass 01_example.t

---
 t/01_example.t |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/t/01_example.t b/t/01_example.t
index c44d06c..3394d1a 100755
--- a/t/01_example.t
+++ b/t/01_example.t
@@ -22,6 +22,8 @@ my $make = $Config{make};
 
 my $out;
 
+close STDIN;
+
 ok($out = `$^X Makefile.PL`, "$^X Makefile.PL");
 is $?, 0, '... success' or diag $out;
 
-- 
1.7.9.5