Update IPC-Cmd to CPAN version 1.04
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Sun, 14 Jul 2019 14:40:03 +0000 (15:40 +0100)
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>
Sun, 14 Jul 2019 14:40:03 +0000 (15:40 +0100)
  [DELTA]

1.04 Sat Jul 13 10:08:08 BST 2019

  Bug fixes:
  - Fixed usage of setsid()

Porting/Maintainers.pl
cpan/IPC-Cmd/lib/IPC/Cmd.pm

index 2d543d0..4ca00aa 100755 (executable)
@@ -643,7 +643,7 @@ use File::Glob qw(:case);
     },
 
     'IPC::Cmd' => {
-        'DISTRIBUTION' => 'BINGOS/IPC-Cmd-1.02.tar.gz',
+        'DISTRIBUTION' => 'BINGOS/IPC-Cmd-1.04.tar.gz',
         'FILES'        => q[cpan/IPC-Cmd],
     },
 
index 42cdd59..88ed295 100644 (file)
@@ -19,7 +19,7 @@ BEGIN {
                         $HAVE_MONOTONIC
                     ];
 
-    $VERSION        = '1.02';
+    $VERSION        = '1.04';
     $VERBOSE        = 0;
     $DEBUG          = 0;
     $WARN           = 1;
@@ -1204,7 +1204,7 @@ sub run_forked {
       # which do setsid theirselves -- can't do anything
       # with those)
 
-      POSIX::setsid() || Carp::confess("Error running setsid: " . $!);
+      POSIX::setsid() == -1 and Carp::confess("Error running setsid: " . $!);
 
       if ($opts->{'child_BEGIN'} && ref($opts->{'child_BEGIN'}) eq 'CODE') {
         $opts->{'child_BEGIN'}->();