cvsuser 04/12/14 11:40:04
Modified: App-Context/lib/App Context.pm
Log:
add pid/datetime to log() entries
Revision Changes Path
1.19 +2 -2 p5ee/App-Context/lib/App/Context.pm
Index: Context.pm
===================================================================
RCS file: /cvs/public/p5ee/App-Context/lib/App/Context.pm,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -r1.18 -r1.19
--- Context.pm 10 Nov 2004 15:39:24 -0000 1.18
+++ Context.pm 14 Dec 2004 19:40:03 -0000 1.19
@@ -1,6 +1,6 @@
#############################################################################
-## $Id: Context.pm,v 1.18 2004/11/10 15:39:24 spadkins Exp $
+## $Id: Context.pm,v 1.19 2004/12/14 19:40:03 spadkins Exp $
#############################################################################
package App::Context;
@@ -1257,7 +1257,7 @@
sub log {
&App::sub_entry if ($App::trace);
my $self = shift;
- print STDERR @_;
+ print STDERR "[$$] ", time2str("%Y-%m-%d %H:%M:%S", time()), " ", @_;
&App::sub_exit() if ($App::trace);
}