diff options
-rw-r--r-- | lib/IO/Pty/Easy.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/IO/Pty/Easy.pm b/lib/IO/Pty/Easy.pm index a67babc..7df04e3 100644 --- a/lib/IO/Pty/Easy.pm +++ b/lib/IO/Pty/Easy.pm @@ -314,6 +314,13 @@ sub _wait_for_inactive { } # }}} +# DESTROY {{{ +sub DESTROY { + my $self = shift; + $self->close; +} +# }}} + # Ending documentation {{{ =head1 SEE ALSO |