After dupping the fd, the first read was getting 0 as a first char. Of
course other platforms should probably also fixed.
Index: srclib/apr/file_io/unix/filedup.c
===================================================================
RCS file: /home/cvspublic/apr/file_io/unix/filedup.c,v
retrieving revision 1.35
diff -u -r1.35 filedup.c
--- srclib/apr/file_io/unix/filedup.c 2001/11/21 04:21:03 1.35
+++ srclib/apr/file_io/unix/filedup.c 2001/12/06 07:51:33
@@ -89,6 +89,9 @@
}
/* this is the way dup() works */
(*new_file)->blocking = old_file->blocking;
+
+ (*new_file)->ungetchar = old_file->ungetchar;
+
/* apr_file_dup() clears the inherit attribute, user must call
* apr_file_set_inherit() again on the dupped handle, as necessary.
*/
--
_____________________________________________________________________
Stas Bekman JAm_pH -- Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide http://perl.apache.org/guide
mailto:[EMAIL PROTECTED] http://ticketmaster.com http://apacheweek.com
http://singlesheaven.com http://perl.apache.org http://perlmonth.com/
