summaryrefslogtreecommitdiff
path: root/perl5
diff options
context:
space:
mode:
Diffstat (limited to 'perl5')
-rw-r--r--perl5/Local/Interactive.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl5/Local/Interactive.pm b/perl5/Local/Interactive.pm
index bac754a4..f58c4e1e 100644
--- a/perl5/Local/Interactive.pm
+++ b/perl5/Local/Interactive.pm
@@ -221,7 +221,7 @@ sub _sysptycap_pty {
exec @_;
}
$pty->close;
- my $return = {};
+ my $return = { output => "" };
while (1) {
my $rin = "";
vec($rin, fileno $slave, 1) = 1;