diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2022-06-19 21:59:29 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-06-20 17:49:52 -0700 |
commit | 188dce8c09ff9d49b2dec8001c831ea98947a5b1 (patch) | |
tree | 708c0982aa1e1c4f98830b4379a88a0ce64f37d6 /perl5 | |
parent | e0af493195d4743d8d44a29fca82291b7b872cba (diff) | |
download | dotfiles-188dce8c09ff9d49b2dec8001c831ea98947a5b1.tar.gz |
_sysptycap_pty: ensure output field defined when cmd outputs nothing
Diffstat (limited to 'perl5')
-rw-r--r-- | perl5/Local/Interactive.pm | 2 |
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; |