|
From: <jgr...@us...> - 2003-06-09 22:39:21
|
Update of /cvsroot/popfile/engine/POPFile
In directory sc8-pr-cvs1:/tmp/cvs-serv26282/POPFile
Modified Files:
Logger.pm
Log Message:
Fix dumb bug on my part to do with empty log files
Index: Logger.pm
===================================================================
RCS file: /cvsroot/popfile/engine/POPFile/Logger.pm,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** Logger.pm 9 Jun 2003 18:31:55 -0000 1.17
--- Logger.pm 9 Jun 2003 22:39:16 -0000 1.18
***************
*** 189,193 ****
my ( $self ) = @_;
! return $self->{last_ten__};
}
--- 189,198 ----
my ( $self ) = @_;
! if ( $#{$self->{last_ten__}} >= 0 ) {
! return @{$self->{last_ten__}};
! } else {
! my @temp = ( 'log empty' );
! return @temp;
! }
}
|