cvs commit: modperl-2.0/src/modules/perl modperl_io.c

[stas]

stas        2003/11/22 02:29:29

  Modified:    src/modules/perl modperl_io.c
  Log:
  food for thoughts
  
  Revision  Changes    Path
  1.21      +2 -0      modperl-2.0/src/modules/perl/modperl_io.c
  
  Index: modperl_io.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_io.c,v
  retrieving revision 1.20
  retrieving revision 1.21
  diff -u -u -r1.20 -r1.21
  --- modperl_io.c      22 Nov 2003 10:27:41 -0000      1.20
  +++ modperl_io.c      22 Nov 2003 10:29:29 -0000      1.21
  @@ -155,6 +155,8 @@
   
       MP_TRACE_o(MP_FUNC, "end\n");
   
  +    /* XXX: shouldn't we preserve the value STDOUT had before it was
  +     * overridden? */
       IoFLUSH_off(handle); /* STDOUT's $|=0 */
   
       return handle_save;