cvs commit: modperl-docs/src/docs/2.0/user/handlers server.pod
stas2003/01/10 21:43:40
Modified:src/docs/2.0/user/handlers server.pod
Log:
update the logging example to gracefully handle the case when the log file
is not open
Revision ChangesPath
1.3 +8 -1 modperl-docs/src/docs/2.0/user/handlers/server.pod
Index: server.pod
===
RCS file: /home/cvs/modperl-docs/src/docs/2.0/user/handlers/server.pod,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- server.pod17 Nov 2002 05:28:40 - 1.2
+++ server.pod11 Jan 2003 05:43:40 - 1.3
@@ -90,7 +90,14 @@
sub say {
my($caller) = (caller(1))[3] =~ /([^:]+)$/;
- printf $log_fh "[%s] - %-11s: %s\n", scalar(localtime), $caller, $_[0];
+ if (defined $log_fh) {
+ printf $log_fh "[%s] - %-11s: %s\n",
+ scalar(localtime), $caller, $_[0];
+ }
+ else {
+ # when the log file is not open
+ warn __PACKAGE__ . " says: $_[0]\n";
+ }
}
END {
-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
cvs commit: modperl-docs/src/about/contributors companies.pod
stas2003/01/10 21:35:44 Modified:src/about/contributors companies.pod Log: markup fix Revision ChangesPath 1.2 +1 -1 modperl-docs/src/about/contributors/companies.pod Index: companies.pod === RCS file: /home/cvs/modperl-docs/src/about/contributors/companies.pod,v retrieving revision 1.1 retrieving revision 1.2 diff -u -r1.1 -r1.2 --- companies.pod 11 Jan 2003 05:31:04 - 1.1 +++ companies.pod 11 Jan 2003 05:35:44 - 1.2 @@ -8,7 +8,7 @@ developers and/or allowing their employees to work on mod_perl as a part of their day job. -=head Companies +=head1 Companies =over - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
cvs commit: modperl-docs/src/about config.cfg
stas2003/01/10 21:31:04 Modified:src/about config.cfg Added: src/about/contributors companies.pod Log: add the initial doc listing companies supporting mod_perl developers Revision ChangesPath 1.1 modperl-docs/src/about/contributors/companies.pod Index: companies.pod === =head1 NAME Companies sponsoring and supporting mod_perl developers =head1 Description Several companies have contributed to mod_perl by sponsoring mod_perl developers and/or allowing their employees to work on mod_perl as a part of their day job. =head Companies =over =item * Critical Path Critical Path (http://www.cp.net/) has sponsored Doug MacEachern. (XXX: when?) =item * Covalent Technologies Covalent Technologies (http://www.covalent.net/) has sponsored Doug MacEachern. (XXX: when/what?) =item * TicketMaster In 2002 TicketMaster (http://www.ticketmaster.com/) has sponsored Stas Bekman to work on the mod_perl documentation, the new perl.apache.org site and contributing to the mod_perl 2.0 development. =back =head1 Maintainer The maintainer is the person you should contact with updates, corrections and patches. =over =item * Stas Bekman Estas (at) stason.orgE =back =cut 1.9 +1 -0 modperl-docs/src/about/config.cfg Index: config.cfg === RCS file: /home/cvs/modperl-docs/src/about/config.cfg,v retrieving revision 1.8 retrieving revision 1.9 diff -u -r1.8 -r1.9 --- config.cfg15 Oct 2002 05:58:47 - 1.8 +++ config.cfg11 Jan 2003 05:31:04 - 1.9 @@ -12,6 +12,7 @@ group => 'Development', chapters => [qw( contributors/people.html +contributors/companies.pod contributors/other.pod history.pod )], - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
cvs commit: modperl-docs/src/download index_top.html
stas2003/01/10 21:04:20 Modified:src/download index_top.html Log: bump up version Revision ChangesPath 1.10 +1 -1 modperl-docs/src/download/index_top.html Index: index_top.html === RCS file: /home/cvs/modperl-docs/src/download/index_top.html,v retrieving revision 1.9 retrieving revision 1.10 diff -u -r1.9 -r1.10 --- index_top.html16 Oct 2002 13:20:08 - 1.9 +++ index_top.html11 Jan 2003 05:04:19 - 1.10 @@ -14,7 +14,7 @@ -mod_perl 2.0 (in development): Version 1.99_07 - September 25, 2002 +mod_perl 2.0 (in development): Version 1.99_08 - Jan 10, 2003 http://perl.apache.org/dist/mod_perl-2.0-current.tar.gz";>Download | http://perl.apache.org/dist/mod_perl-2.0-current";>Browse | http://perl.apache.org/dist/mod_perl-2.0-current/Changes";>Changes | - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
cvs commit: modperl-docs/src/docs/1.0/api/Apache SizeLimit.pod
stas2003/01/10 18:34:32 Modified:src/docs/1.0/api/Apache SizeLimit.pod Log: use the direct link to the Sharing Memory section Submitted by: Perrin Harkins <[EMAIL PROTECTED]> Revision ChangesPath 1.4 +2 -5 modperl-docs/src/docs/1.0/api/Apache/SizeLimit.pod Index: SizeLimit.pod === RCS file: /home/cvs/modperl-docs/src/docs/1.0/api/Apache/SizeLimit.pod,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- SizeLimit.pod 12 May 2002 05:41:21 - 1.3 +++ SizeLimit.pod 11 Jan 2003 02:34:32 - 1.4 @@ -80,11 +80,8 @@ In addition to simply checking the total size of a process, this module can factor in how much of the memory used by the process is actually being shared by copy-on-write. If you don't understand how -memory is shared in this way, take a look at the L. - - -META: change link when site is live. +memory is shared in this way, take a look at the L section. You can take advantage of the shared memory information by setting a minimum shared size and/or a maximum unshared size. Experience on one - To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
