stas 2003/11/15 12:22:58
Modified: lib/Apache Status.pm
Log:
disable myconfig for now due to problems with calling Config::myconfig
under threads
Submitted by: Juanma Barranquero <[EMAIL PROTECTED]>
Revision Changes Path
1.12 +7 -2 modperl-2.0/lib/Apache/Status.pm
Index: Status.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/lib/Apache/Status.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -u -r1.11 -r1.12
--- Status.pm 15 Nov 2003 19:34:32 -0000 1.11
+++ Status.pm 15 Nov 2003 20:22:58 -0000 1.12
@@ -368,8 +368,13 @@
}
sub status_myconfig {
- require Config;
- ["<pre>", Config::myconfig(), "</pre>"]
+ # XXX: Config::myconfig(); fails under threads with (perl < 5.8.3?)
+ # "Modification of a read-only value attempted"
+ # need API to query the mpm and run it only if the mpm is not threaded
+ # require Config;
+ # my $myconfig = Config::myconfig();
+ my $myconfig = "Under construction";
+ ["<pre>", $myconfig, "</pre>"];
}