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

[stas]

stas        2003/01/22 20:09:12

  Modified:    src/modules/perl mod_perl.c
  Log:
  more the rc declaration to the head of the function where it belongs
  Submitted by: Randy Kobes <[EMAIL PROTECTED]>
  
  Revision  Changes    Path
  1.148     +3 -3      modperl-2.0/src/modules/perl/mod_perl.c
  
  Index: mod_perl.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/mod_perl.c,v
  retrieving revision 1.147
  retrieving revision 1.148
  diff -u -r1.147 -r1.148
  --- mod_perl.c        23 Jan 2003 00:31:28 -0000      1.147
  +++ mod_perl.c        23 Jan 2003 04:09:12 -0000      1.148
  @@ -752,8 +752,8 @@
   {
       MP_dDCFG;
       GV *h_stdin, *h_stdout;
  -    int retval;
  -    MP_dRCFG;
  +    apr_status_t retval, rc;
  + MP_dRCFG;
   #ifdef USE_ITHREADS
       pTHX;
       modperl_interp_t *interp;
  @@ -806,7 +806,7 @@
   #endif
   
       /* flush output buffer after interpreter is putback */
  -    apr_status_t rc = modperl_response_finish(r);
  +    rc = modperl_response_finish(r);
       if (rc != APR_SUCCESS) {
           retval = rc;
       }