diff options
author | Jesse Luehrs <doy@tozt.net> | 2009-07-06 22:18:04 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2009-07-06 22:18:04 -0500 |
commit | 3c91f1b401896f4a35e94a88c117c67e83137e9e (patch) | |
tree | 6b8fe010ab7712ed6c86662301cb668e8f7a56f3 | |
parent | 6fe008e57f0c6daffd5bc3fbe611ed5bdad5dd27 (diff) | |
download | io-pty-easy-3c91f1b401896f4a35e94a88c117c67e83137e9e.tar.gz io-pty-easy-3c91f1b401896f4a35e94a88c117c67e83137e9e.zip |
update some tests that accessed the hashref directly
-rw-r--r-- | t/001-open-close.t | 2 | ||||
-rw-r--r-- | t/002-spawn.t | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/t/001-open-close.t b/t/001-open-close.t index 8ea5c69..1c9eed1 100644 --- a/t/001-open-close.t +++ b/t/001-open-close.t @@ -6,4 +6,4 @@ use IO::Pty::Easy; my $pty = IO::Pty::Easy->new; $pty->close; -ok(!defined($pty->{pty}), "closing a pty before a spawn"); +ok(!$pty->opened, "closing a pty before a spawn"); diff --git a/t/002-spawn.t b/t/002-spawn.t index 6924f85..620a57a 100644 --- a/t/002-spawn.t +++ b/t/002-spawn.t @@ -13,4 +13,4 @@ ok(!$pty->is_active, "killing a subprocess"); $pty->spawn("$^X -ple ''"); $pty->close; ok(!$pty->is_active, "auto-killing a pty with close()"); -ok(!defined($pty->{pty}), "closing a pty after a spawn"); +ok(!$pty->opened, "closing a pty after a spawn"); |