summaryrefslogtreecommitdiffstats
path: root/dns_wizard/scripts
diff options
context:
space:
mode:
authorFlorent Villard <warly@mandriva.com>2003-02-28 15:58:38 +0000
committerFlorent Villard <warly@mandriva.com>2003-02-28 15:58:38 +0000
commit8fc65e9058dfca6638e6dd4662b1ad5452f2e659 (patch)
tree50ab21de57911af6a7df90139769d4edce216677 /dns_wizard/scripts
parentb53593dd74b1c255d6e3cba0eef5ade14b6d6c2b (diff)
downloaddrakwizard-8fc65e9058dfca6638e6dd4662b1ad5452f2e659.tar
drakwizard-8fc65e9058dfca6638e6dd4662b1ad5452f2e659.tar.gz
drakwizard-8fc65e9058dfca6638e6dd4662b1ad5452f2e659.tar.bz2
drakwizard-8fc65e9058dfca6638e6dd4662b1ad5452f2e659.tar.xz
drakwizard-8fc65e9058dfca6638e6dd4662b1ad5452f2e659.zip
fix dns config
Diffstat (limited to 'dns_wizard/scripts')
-rw-r--r--dns_wizard/scripts/Dnsconf.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/dns_wizard/scripts/Dnsconf.pm b/dns_wizard/scripts/Dnsconf.pm
index 2c99cc1a..4b8b66b0 100644
--- a/dns_wizard/scripts/Dnsconf.pm
+++ b/dns_wizard/scripts/Dnsconf.pm
@@ -68,7 +68,9 @@ sub get_dns2 {
sub up_serial {
my ($file) = @_;
- my $serial_nbm = `date +%Y%m%d00` or die "date not found: $!";
+ my (undef, undef, undef, $mday, $mon, $year) = gmtime(time);
+ $year += 1900;
+ my $serial_nbm = sprintf "%4dY%2dm%2d00", $year, $mon, $mday;
output($file, map {
my $line = $_;
if (/^(\s*)(\d*)(\s*;\s*Serial.*)$/) {