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 <[EMAIL PROTECTED]>]
+set r->notes("error-notes") to $@ if $@ after a Perl*Handlers is run
+[Doug / Tom Mornini <[EMAIL PROTECTED]>]
added INSTALL.raven
[Adam Qualset <[EMAIL PROTECTED]>]
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;
}