perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@locus.apache.org
Subject cvs commit: modperl/src/modules/perl mod_perl.c
Date Thu, 13 Apr 2000 06:07:33 GMT
dougm       00/04/12 23:07:33

  Modified:    .        Changes
               src/modules/perl mod_perl.c
  Log:
  fix indentation and change description
  
  Revision  Changes    Path
  1.467     +2 -2      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.466
  retrieving revision 1.467
  diff -u -r1.466 -r1.467
  --- Changes	2000/04/12 21:23:18	1.466
  +++ Changes	2000/04/13 06:07:32	1.467
  @@ -10,8 +10,8 @@
   
   =item 1.22_01-dev
   
  -set r->notes("error-notes") to $@ when there is a compile error.
  -[ Doug / Tom Mornini <tmornini@infomania.com>]
  +set r->notes("error-notes") to $@ if $@ after a Perl*Handlers is run
  +[Doug / Tom Mornini <tmornini@infomania.com>]
   
   added INSTALL.raven
   [Adam Qualset <adam@covalent.net>]
  
  
  
  1.116     +3 -3      modperl/src/modules/perl/mod_perl.c
  
  Index: mod_perl.c
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.c,v
  retrieving revision 1.115
  retrieving revision 1.116
  diff -u -r1.115 -r1.116
  --- mod_perl.c	2000/04/12 21:23:18	1.115
  +++ mod_perl.c	2000/04/13 06:07:33	1.116
  @@ -1635,9 +1635,9 @@
       if(perl_eval_ok(r->server) != OK) {
   	dTHRCTX;
   	MP_STORE_ERROR(r->uri, ERRSV);
  -    if (r->notes) {
  -        ap_table_set(r->notes, "error-notes", SvPVX(ERRSV));
  -    }
  +        if (r->notes) {
  +            ap_table_set(r->notes, "error-notes", SvPVX(ERRSV));
  +        }
   	if(!perl_sv_is_http_code(ERRSV, &status))
   	    status = SERVER_ERROR;
       }
  
  
  

Mime
View raw message