r39542 - in /branches/upstream/libproc-simple-perl/current: .cvsignore Changes META.yml README Simple.pm adm/

[carnil-guest at users.alioth.debian.org]

Author: carnil-guest
Date: Thu Jul  9 14:33:27 2009
New Revision: 39542

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39542
Log:
[svn-upgrade] Integrating new upstream version, libproc-simple-perl (1.26)

Removed:
    branches/upstream/libproc-simple-perl/current/.cvsignore
    branches/upstream/libproc-simple-perl/current/adm/
Modified:
    branches/upstream/libproc-simple-perl/current/Changes
    branches/upstream/libproc-simple-perl/current/META.yml
    branches/upstream/libproc-simple-perl/current/README
    branches/upstream/libproc-simple-perl/current/Simple.pm

Modified: branches/upstream/libproc-simple-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libproc-simple-perl/current/Changes?rev=39542&op=diff
==============================================================================
--- branches/upstream/libproc-simple-perl/current/Changes (original)
+++ branches/upstream/libproc-simple-perl/current/Changes Thu Jul  9 14:33:27 2009
@@ -1,6 +1,12 @@
 ######################################################################
     Proc::Simple CHANGES
 ######################################################################
+
+          from 1.25: Localize special variables so that the exit status 
+                     from waitpid doesn't leak out, causing exit status 
+                     to be incorrect (RT33440, fixed by Brad Cavanagh).
+
+          from 1.24: Added copyright header
 
           from 1.23: Applied doc patch by Janne Chr. Schulz
 

Modified: branches/upstream/libproc-simple-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libproc-simple-perl/current/META.yml?rev=39542&op=diff
==============================================================================
--- branches/upstream/libproc-simple-perl/current/META.yml (original)
+++ branches/upstream/libproc-simple-perl/current/META.yml Thu Jul  9 14:33:27 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Proc-Simple
-version:            1.25
+version:            1.26
 abstract:           ~
 author:  []
 license:            unknown

Modified: branches/upstream/libproc-simple-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libproc-simple-perl/current/README?rev=39542&op=diff
==============================================================================
--- branches/upstream/libproc-simple-perl/current/README (original)
+++ branches/upstream/libproc-simple-perl/current/README Thu Jul  9 14:33:27 2009
@@ -1,5 +1,5 @@
 ######################################################################
-    Proc::Simple 1.25
+    Proc::Simple 1.26
 ######################################################################
 
 NAME
@@ -280,3 +280,5 @@
 
         Jeff Holt provided a patch for time tracking with t0() and t1().
 
+        Brad Cavanagh fixed RT33440 (unreliable $?)
+

Modified: branches/upstream/libproc-simple-perl/current/Simple.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libproc-simple-perl/current/Simple.pm?rev=39542&op=diff
==============================================================================
--- branches/upstream/libproc-simple-perl/current/Simple.pm (original)
+++ branches/upstream/libproc-simple-perl/current/Simple.pm Thu Jul  9 14:33:27 2009
@@ -117,7 +117,7 @@
 
 @ISA     = qw(Exporter AutoLoader);
 @EXPORT  = qw( );
-$VERSION = '1.25';
+$VERSION = '1.26';
 
 ######################################################################
 # Globals: Debug and the mysterious waitpid nohang constant.
@@ -516,6 +516,10 @@
 sub DESTROY {
     my $self = shift;
 
+    # Localize special variables so that the exit status from waitpid
+    # doesn't leak out, causing exit status to be incorrect.
+    local( $., $@, $!, $^E, $? );
+
     # Processes never started don't have to be cleaned up in
     # any special way.
     return unless $self->pid();
@@ -597,6 +601,10 @@
 # Reaps processes, uses the magic WNOHANG constant
 ######################################################################
 sub THE_REAPER {
+
+    # Localize special variables so that the exit status from waitpid
+    # doesn't leak out, causing exit status to be incorrect.
+    local( $., $@, $!, $^E, $? );
 
     my $child;
     my $now = time();
@@ -749,4 +757,6 @@
 
 Jeff Holt provided a patch for time tracking with t0() and t1().
 
-=cut
+Brad Cavanagh fixed RT33440 (unreliable $?)
+
+=cut