From e006c6e8ce11b3db53d5cd88b81092bf727f3080 Mon Sep 17 00:00:00 2001 From: ivan Date: Sun, 3 Jun 2001 17:22:52 +0000 Subject: [PATCH] SOA serial number problem with Date::Format %e: no leading zero --- FS/FS/svc_domain.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index c533ee870..01aa21a6c 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -186,7 +186,7 @@ sub insert { 'reczone' => '@', 'recaf' => 'IN', 'rectype' => 'SOA', - 'recdata' => "$soamachine $soaemail ( ". time2str("%Y%m%e", time). "00 ". + 'recdata' => "$soamachine $soaemail ( ". time2str("%Y%m%d", time). "00 ". "$soarefresh $soaretry $soaexpire $soadefaultttl )" }; $error = $soa->insert; @@ -478,7 +478,7 @@ sub submit_internic { =head1 VERSION -$Id: svc_domain.pm,v 1.11 2001-05-22 16:43:28 ivan Exp $ +$Id: svc_domain.pm,v 1.12 2001-06-03 17:22:52 ivan Exp $ =head1 BUGS -- 2.11.0