summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS1
-rw-r--r--perl-install/install/NEWS2
-rw-r--r--perl-install/timezone.pm6
3 files changed, 9 insertions, 0 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index a962a5b49..e4e410e0c 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,6 +1,7 @@
- service_harddrake:
o fix detecting modules installed in new dkms locations (/dkms and
/dkms-binary) instead of /kernel
+- drakclock: write UTC setting in /etc/adjtime (#36522)
Version 10.27 - 3 April 2008
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 733fdacdc..676cff178 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,5 @@
+- time: write UTC setting in /etc/adjtime (#36522)
+
Version 10.28 - 3 April 2008
- fix computed install size in group selection (#39303)
diff --git a/perl-install/timezone.pm b/perl-install/timezone.pm
index 5babf2061..b072dda3a 100644
--- a/perl-install/timezone.pm
+++ b/perl-install/timezone.pm
@@ -64,6 +64,12 @@ sub write {
UTC => bool2text($t->{UTC}),
ARC => "false",
});
+
+ my $adjtime_file = $::prefix . '/etc/adjtime';
+ my @adjtime = cat_($adjtime_file);
+ @adjtime or @adjtime = ("0.0 0 0.0\n", "0\n");
+ $adjtime[2] = $t->{UTC} ? "UTC\n" : "LOCAL\n";
+ output_p($adjtime_file, @adjtime);
}
sub reload_sys_clock {