Change date format to %d-%02d-%02d

CVS version numbers

Perl/Webwml/L10n/Db.pm: 1.7 -> 1.8

1 files changed, 1 insertions, 1 deletions

diff --git a/Perl/Webwml/L10n/Db.pm b/Perl/Webwml/L10n/Db.pm
index dfbeb977546..67171f85a01 100644
--- a/Perl/Webwml/L10n/Db.pm
+++ b/Perl/Webwml/L10n/Db.pm
@@ -230,7 +230,7 @@ sub write {
         open (DB,"> $file")
                 || die "Unable to write to $file\n";
 
-        print DB join('-', (Time::localtime::localtime->year() + 1900, Time::localtime::localtime->mon() + 1, Time::localtime::localtime->mday))."\n\n";
+        printf DB "%d-%02d-%02d\n\n", Time::localtime::localtime->year() + 1900, Time::localtime::localtime->mon() + 1, Time::localtime::localtime->mday;
         foreach my $pkg (keys %{$self->{data}}) {
                 foreach (@{$self->{scalar}}) {
                         next unless defined($self->{data}->{$pkg}->{$_});