svn commit: r1613236 - /vcl/trunk/managementnode/lib/VCL/Module/OS.pm

[ar...@apache.org]

Author: arkurth
Date: Thu Jul 24 18:27:52 2014
New Revision: 1613236

URL: http://svn.apache.org/r1613236
Log:
VCL-702
Updated run_ssh_command calls in OS.pm to use $self->execute.

Modified:
    vcl/trunk/managementnode/lib/VCL/Module/OS.pm

Modified: vcl/trunk/managementnode/lib/VCL/Module/OS.pm
URL: http://svn.apache.org/viewvc/vcl/trunk/managementnode/lib/VCL/Module/OS.pm?rev=1613236&r1=1613235&r2=1613236&view=diff
==============================================================================
--- vcl/trunk/managementnode/lib/VCL/Module/OS.pm (original)
+++ vcl/trunk/managementnode/lib/VCL/Module/OS.pm Thu Jul 24 18:27:52 2014
@@ -708,7 +708,7 @@ sub is_ssh_responding {
 		#	ignore_error => 1,
 		#});
 		
-		my ($exit_status, $output) = run_ssh_command({
+		my ($exit_status, $output) = $self->execute({
 			node => $computer_node_name,
 			command => "echo \"testing ssh on $computer_node_name\"",
 			max_attempts => $max_attempts,
@@ -1122,7 +1122,6 @@ sub set_vcld_post_load_status {
 	}
 
 	my $image_os_type = $self->data->get_image_os_type();
-	my $management_node_keys = $self->data->get_management_node_keys();
 	my $computer_node_name   = $self->data->get_computer_node_name();
 	
 	my $time = localtime;
@@ -1146,7 +1145,7 @@ sub set_vcld_post_load_status {
 		$command .= " && unix2dos currentimage.txt";
 	}
 	
-	my ($exit_status, $output) = run_ssh_command($computer_node_name, $management_node_keys, $command, '', '', 1);
+	my ($exit_status, $output) = $self->execute($command, 1);
 	if (defined($exit_status) && $exit_status == 0) {
 		notify($ERRORS{'DEBUG'}, 0, "added line to currentimage.txt on $computer_node_name: '$post_load_line'");
 	}