diff options
| -rw-r--r-- | CHANGES | 3 | ||||
| -rw-r--r-- | qooxdoo/source/perl/Qooxdoo/Services/Tr.pm | 5 |
2 files changed, 6 insertions, 2 deletions
@@ -1,3 +1,6 @@ +* do not load :sys_wait_h from POSIX perl module since this seems to + be missing in some linux distros and we can do alright without I think. + 2008/6/13 -- released version 2.4.1 * fixed js packaging error ... s/VERSION/x/ was a bad idea diff --git a/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm b/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm index f3a5b47..ddfa796 100644 --- a/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm +++ b/qooxdoo/source/perl/Qooxdoo/Services/Tr.pm @@ -1,6 +1,6 @@ package Qooxdoo::Services::Tr; use strict; -use POSIX qw(setsid :sys_wait_h); +use POSIX qw(setsid); use Time::HiRes qw(usleep); use Socket; sub GetAccessibility { @@ -103,7 +103,8 @@ sub method_run_tr $size = -s $fh; # make sure we reap any zombi instances of tr # this is especially important when running with speedy of fastcgi - waitpid($handle,WNOHANG); + # 1 = WNOHANG + waitpid($handle,1); $again = kill(0, $handle); usleep(1000*300) if $rounds; # print STDERR "$again, $handle, $size, $point\n"; |