From 3ac8638b4c875d2db479afc28dc336a80ed546fa Mon Sep 17 00:00:00 2001 From: doy Date: Tue, 3 Feb 2009 20:04:18 -0500 Subject: close the child ptys after tests that spawn things in them --- t/003-subprocess.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 't/003-subprocess.t') diff --git a/t/003-subprocess.t b/t/003-subprocess.t index c5d17bd..352b7b4 100644 --- a/t/003-subprocess.t +++ b/t/003-subprocess.t @@ -18,4 +18,4 @@ unlike($outside_of_pty, qr/ok/, "running outside of pty fails -t checks"); $script .= "sleep 1 while 1;"; $pty->spawn("$^X -e '$script'"); like($pty->read, qr/ok/, "runs subprocess in a pty"); -$pty->kill; +$pty->close; -- cgit v1.2.3-54-g00ecf