perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-2.0/src/modules/perl modperl_io.c
Date Thu, 02 Oct 2003 09:03:32 GMT
stas        2003/10/02 02:03:32

  Modified:    src/modules/perl modperl_io.c
  Log:
  length(">&STDIN") is 7, not 8 (but it seems not to matter)
  
  Revision  Changes    Path
  1.12      +1 -1      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.11
  retrieving revision 1.12
  diff -u -u -r1.11 -r1.12
  --- modperl_io.c	24 Aug 2003 19:37:29 -0000	1.11
  +++ modperl_io.c	2 Oct 2003 09:03:32 -0000	1.12
  @@ -99,7 +99,7 @@
       MP_TRACE_o(MP_FUNC, "start");
   
       /* open my $oldout, ">&STDIN" or die "Can't dup STDIN: $!"; */
  -    status = Perl_do_open(aTHX_ handle_save, ">&STDIN", 8, FALSE, O_RDONLY,
  +    status = Perl_do_open(aTHX_ handle_save, ">&STDIN", 7, FALSE, O_RDONLY,
                             0, Nullfp);
       if (status == 0) {
           Perl_croak(aTHX_ "Failed to dup STDIN: %_", get_sv("!", TRUE));
  
  
  

Mime
View raw message