amassivus/clusterssh
1
0
Fork 0
mirror of https://github.com/duncs/clusterssh.git synced 2025-07-02 01:21:14 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

v4.12; fix undefined value error

Browse source
This commit is contained in:
Duncan Ferguson 2017-12-23 12:46:48 +00:00
parent d8addf58d1
commit 37ce2b8a0d
5 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/App/ClusterSSH.pm
View file

@ -3,7 +3,7 @@ package App::ClusterSSH;
use 5.008.004;
use warnings;
use strict;
use version; our $VERSION = version->new('4.11');
use version; our $VERSION = version->new('4.12');
use Carp qw/cluck :DEFAULT/;
@ -1452,7 +1452,7 @@ sub setup_repeat() {
);
# See if there are any commands in the external command pipe
{
if ( defined $self->{external_command_pipe_fh} ) {
my $ext_cmd;
sysread( $self->{external_command_pipe_fh}, $ext_cmd, 400 );
if ($ext_cmd) {