Update of /cvsroot/popfile/engine/POPFile
In directory sc8-pr-cvs1:/tmp/cvs-serv30866/POPFile
Modified Files:
Logger.pm
Log Message:
Add leading zeroes in the hours, minutes, seconds
Index: Logger.pm
===================================================================
RCS file: /cvsroot/popfile/engine/POPFile/Logger.pm,v
retrieving revision 1.15
retrieving revision 1.16
diff -C2 -d -r1.15 -r1.16
*** Logger.pm 29 Apr 2003 12:10:55 -0000 1.15
--- Logger.pm 30 Apr 2003 20:28:30 -0000 1.16
***************
*** 7,11 ****
#----------------------------------------------------------------------------
#
! # This module handles POPFile's logger. It is used to save debugging
# information to disk or to send it to the screen.
#
--- 7,11 ----
#----------------------------------------------------------------------------
#
! # This module handles POPFile's logger. It is used to save debugging
# information to disk or to send it to the screen.
#
***************
*** 143,148 ****
$year += 1900;
$mon += 1;
- my $msg = "$year/$mon/$mday $hour:$min:$sec $$: $message";
if ( $self->global_config_( 'debug' ) & 1 ) {
--- 143,152 ----
$year += 1900;
$mon += 1;
+ $min = "0$min" if ( $min < 10 );
+ $hour = "0$hour" if ( $hour < 10 );
+ $sec = "0$sec" if ( $sec < 10 );
+
+ my $msg = "$year/$mon/$mday $hour:$min:$sec $$: $message";
if ( $self->global_config_( 'debug' ) & 1 ) {
|
