Author: arkurth
Date: Wed Jul 15 14:34:47 2009
New Revision: 794285
URL: http://svn.apache.org/viewvc?rev=794285&view=rev
Log:
VCL-183
Replaced all calls to DataStructure.pm::get_computer_private_ip() with
get_computer_private_ip_address(). Removed get_computer_private_ip() sub from
DataStructure.pm.
Modified:
incubator/vcl/trunk/managementnode/lib/VCL/DataStructure.pm
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Ubuntu.pm
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Desktop/Vista.pm
Modified: incubator/vcl/trunk/managementnode/lib/VCL/DataStructure.pm
URL:
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/DataStructure.pm?rev=794285&r1=794284&r2=794285&view=diff
==============================================================================
--- incubator/vcl/trunk/managementnode/lib/VCL/DataStructure.pm (original)
+++ incubator/vcl/trunk/managementnode/lib/VCL/DataStructure.pm Wed Jul 15
14:34:47 2009
@@ -1397,10 +1397,6 @@
=cut
-sub get_computer_private_ip {
- return get_computer_private_ip_address(@_);
-}
-
sub get_computer_private_ip_address {
my $self;
my $argument = shift;
Modified: incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
URL:
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm?rev=794285&r1=794284&r2=794285&view=diff
==============================================================================
--- incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm (original)
+++ incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm Wed Jul 15
14:34:47 2009
@@ -92,7 +92,7 @@
my $user_id = $self->data->get_user_id();
my $user_unityid = $self->data->get_user_login_id();
my $managementnode_shortname =
$self->data->get_management_node_short_name();
- my $computer_private_ip = $self->data->get_computer_private_ip();
+ my $computer_private_ip =
$self->data->get_computer_private_ip_address();
notify($ERRORS{'OK'}, 0, "beginning Linux-specific image capture
preparation tasks: $image_name on $computer_short_name");
Modified: incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Ubuntu.pm
URL:
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Ubuntu.pm?rev=794285&r1=794284&r2=794285&view=diff
==============================================================================
--- incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Ubuntu.pm (original)
+++ incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Ubuntu.pm Wed Jul 15
14:34:47 2009
@@ -92,7 +92,7 @@
my $user_id = $self->data->get_user_id();
my $user_unityid = $self->data->get_user_login_id();
my $managementnode_shortname =
$self->data->get_management_node_short_name();
- my $computer_private_ip = $self->data->get_computer_private_ip();
+ my $computer_private_ip =
$self->data->get_computer_private_ip_address();
notify($ERRORS{'OK'}, 0, "beginning Ubuntu-specific image capture
preparation tasks: $image_name on $computer_short_name");
Modified: incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm
URL:
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm?rev=794285&r1=794284&r2=794285&view=diff
==============================================================================
--- incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm (original)
+++ incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows.pm Wed Jul 15
14:34:47 2009
@@ -97,7 +97,7 @@
my $user_id = $self->data->get_user_id();
my $user_unityid = $self->data->get_user_login_id();
my $managementnode_shortname =
$self->data->get_management_node_short_name();
- my $computer_private_ip = $self->data->get_computer_private_ip();
+ my $computer_private_ip =
$self->data->get_computer_private_ip_address();
notify($ERRORS{'OK'}, 0, "beginning Windows-specific image capture
preparation tasks: $image_name on $computer_short_name");
@@ -552,7 +552,7 @@
my $user_id = $self->data->get_user_id();
my $user_unityid = $self->data->get_user_login_id();
my $managementnode_shortname =
$self->data->get_management_node_short_name();
- my $computer_private_ip = $self->data->get_computer_private_ip();
+ my $computer_private_ip =
$self->data->get_computer_private_ip_address();
notify($ERRORS{'OK'}, 0, "initiating Windows image capture: $image_name
on $computer_short_name");
Modified:
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Desktop/Vista.pm
URL:
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Desktop/Vista.pm?rev=794285&r1=794284&r2=794285&view=diff
==============================================================================
---
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Desktop/Vista.pm
(original)
+++
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Desktop/Vista.pm
Wed Jul 15 14:34:47 2009
@@ -235,7 +235,7 @@
my $user_id = $self->data->get_user_id();
my $user_unityid = $self->data->get_user_login_id();
my $managementnode_shortname =
$self->data->get_management_node_short_name();
- my $computer_private_ip = $self->data->get_computer_private_ip();
+ my $computer_private_ip =
$self->data->get_computer_private_ip_address();
notify($ERRORS{'OK'}, 0, "beginning Windows Vista image capture
preparation tasks: $image_name on $computer_short_name");
