Skip to content

Commit c8f3d37

Browse files
committed
output run error if there is one
1 parent bf9820e commit c8f3d37

File tree

1 file changed

+7
-5
lines changed

1 file changed

+7
-5
lines changed

lib/Module/Release.pm

Lines changed: 7 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1323,9 +1323,9 @@ sub run {
13231323
$self->_debug( "$command\n" );
13241324
$self->_die( "Didn't get a command!" ) unless defined $command;
13251325

1326-
my $pid = IPC::Open3::open3(
1327-
my $child_in, my $child_out, my $child_err = gensym,
1328-
$command
1326+
my $pid = IPC::Open3::open3(
1327+
my $child_in, my $child_out, my $child_err = gensym,
1328+
$command
13291329
);
13301330
close $child_in;
13311331

@@ -1357,11 +1357,13 @@ sub run {
13571357
$self->_debug( $self->_dashes, "\n" );
13581358

13591359
waitpid( $pid, 0 );
1360-
my $child_exit_status = $? >> 8;
1360+
my $child_exit_status = $? >> 8;
1361+
1362+
$self->_warn( $error ) if length $error;
13611363

13621364
if( $child_exit_status ) {
13631365
$self->_run_error_set;
1364-
$self->_warn( "Command [$command] didn't close cleanly: $?" );
1366+
$self->_warn( "Command [$command] didn't close cleanly: $?" );
13651367
}
13661368

13671369
return $output;

0 commit comments

Comments
 (0)