> 
> Scrooling back on the *stdout*, however, gives something that looks
> like what you want; could the test scaffold have gotten bollixed?

nope, that's where it's supposed to be.

anyway, I just tries to reproduce using 5.6.1, 1.99_12, and 2.0.48 and I can't.

here is a patch that will spit some things of interest to the error_log.
maybe.  give it a whirl when you get the chance.

--Geoff
--- lib/Apache/compat.pm        2003-12-19 20:28:43.000000000 -0500
+++ lib/Apache/compat.pm~       2004-01-09 11:07:00.000000000 -0500
@@ -586,15 +586,24 @@
     my $r = Apache::compat::request('Apache::File->tmpfile');
 
     while ($limit--) {
+        warn '*** tmpfile() trial ', 100 - $limit;
+
         my $tmpfile = "$TMPDIR/${$}" . $TMPNAM++;
         my $fh = $class->new;
 
-        sysopen($fh, $tmpfile, $Mode, $Perms);
+        my $rc = sysopen($fh, $tmpfile, $Mode, $Perms);
+
+        warn "  *** sysopen error: $!" unless $rc;
+
         $r->pool->cleanup_register(sub { unlink $tmpfile });
 
         if ($fh) {
+            warn '  *** returning $fh...';
+
             return wantarray ? ($tmpfile, $fh) : $fh;
         }
+
+        warn '  *** did not return $fh this time...';
     }
 }
 

-- 
Reporting bugs: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html

Reply via email to