Changeset 416

Show
Ignore:
Timestamp:
01/03/02 11:15:16
Author:
miyagawa
Message:

fixed datetime bug

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Log-Dispatch-Config/trunk/Changes

    r409 r416  
    11Revision history for Perl extension Log::Dispatch::Config. 
    22 
     30.10  Thu Jan  3 11:12:40 JST 2002 
     4        - Fixed Y2002 bug :( in t/08_datetime.t 
     5          (Thanks to Matt Sergeant <matt@sergeant.org>) 
     6 
    370.09  Thu Dec 27 15:01:12 JST 2001 
    4         - Fixed unnecessary quotes with 'format' 
     8        - Fixed unnecessary quotes with 'format' in pods 
    59        - Clean up format_to_cb code 
    610        - '%%' is replaced by '%' 
  • Log-Dispatch-Config/trunk/lib/Log/Dispatch/Config.pm

    r410 r416  
    33use strict; 
    44use vars qw($VERSION); 
    5 $VERSION = '0.09'; 
     5$VERSION = '0.10'; 
    66 
    77use Log::Dispatch; 
  • Log-Dispatch-Config/trunk/t/08_datetime.t

    r378 r416  
    1212{ 
    1313    my($mday, $mon, $year) = (localtime(time))[3..5]; 
    14     my $today = join '', $year + 1900, $mon + 1, $mday; 
     14    my $today = sprintf '%04s%02d%02d', $year + 1900, $mon + 1, $mday; 
    1515 
    1616    tie *STDERR, 'IO::Scalar', \my $err;