--- trunk/lib/Frey/Shell/Log.pm 2009/01/02 17:14:15 910 +++ trunk/lib/Frey/Shell/Log.pm 2009/01/03 13:38:43 911 @@ -58,7 +58,7 @@ while(<$fh>) { chomp; - if ( m{^(\w\w\w) (\d\d) (\d\d:\d\d:\d\d) (.+)} ) { + if ( m{^(\w\w\w)\s+(\d+)\s+(\d\d:\d\d:\d\d)\s+(.+)} ) { my $message = $4; my $mm = $month2nr->{lc($1)} || die "month $1 unknown"; my $dt = sprintf("%04d-%02d-%02d %s", $yyyy, $mm, $2, $3, $4);