stas 2004/05/02 14:01:01
Modified: src/modules/perl modperl_callback.c
. Changes
Log:
set the 'error-notes' table to the error message on
HTTP_INTERNAL_SERVER_ERROR
Revision Changes Path
1.71 +6 -0 modperl-2.0/src/modules/perl/modperl_callback.c
Index: modperl_callback.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_callback.c,v
retrieving revision 1.70
retrieving revision 1.71
diff -u -u -r1.70 -r1.71
--- modperl_callback.c 4 Mar 2004 06:01:06 -0000 1.70
+++ modperl_callback.c 2 May 2004 21:01:01 -0000 1.71
@@ -142,6 +142,12 @@
status = HTTP_INTERNAL_SERVER_ERROR;
}
+ if (status == HTTP_INTERNAL_SERVER_ERROR) {
+ if (r && r->notes) {
+ apr_table_set(r->notes, "error-notes", SvPV_nolen(ERRSV));
+ }
+ }
+
return status;
}
1.365 +3 -0 modperl-2.0/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl-2.0/Changes,v
retrieving revision 1.364
retrieving revision 1.365
diff -u -u -r1.364 -r1.365
--- Changes 27 Apr 2004 17:26:29 -0000 1.364
+++ Changes 2 May 2004 21:01:01 -0000 1.365
@@ -12,6 +12,9 @@
=item 1.99_14-dev
+set the 'error-notes' table to the error message on
+HTTP_INTERNAL_SERVER_ERROR [Stas]
+
fix the apxs build function to not handle empty lookups as errors
[Randy Kobes, Steve Hay]
