You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@vcl.apache.org by fa...@apache.org on 2013/04/10 20:50:26 UTC
svn commit: r1466616 - /vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm
Author: fapeeler
Date: Wed Apr 10 18:50:26 2013
New Revision: 1466616
URL: http://svn.apache.org/r1466616
Log:
VCL-585
Added code to also update registry values for internet time servers.
Modified:
vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm
Modified: vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm
URL: http://svn.apache.org/viewvc/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm?rev=1466616&r1=1466615&r2=1466616&view=diff
==============================================================================
--- vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm (original)
+++ vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm Wed Apr 10 18:50:26 2013
@@ -8629,6 +8629,15 @@ sub configure_time_synchronization {
# Replace commas with single whitespace
$time_source =~ s/,/ /g;
+ my @time_array = split(/ /, $time_source);
+
+ #Update the registry
+ my $key = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\DateTime\Servers';
+ for my $i (0 .. $#time_array) {
+ my $value = $i+1;
+ if($self->reg_add($key,$value, "REG_SZ", $time_array[$i])){
+ }
+ }
# Assemble the time command
my $time_command;