You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@vcl.apache.org by ar...@apache.org on 2013/04/15 16:50:27 UTC

svn commit: r1468102 - /vcl/trunk/managementnode/lib/VCL/Module/Provisioning/xCAT.pm

Author: arkurth
Date: Mon Apr 15 14:50:27 2013
New Revision: 1468102

URL: http://svn.apache.org/r1468102
Log:
VCL-682
Added check to make sure $self->data is defined in xCAT.pm::DESTROY to avoid 'Can't call method "get_computer_node_name" on an undefined value' errors.

Modified:
    vcl/trunk/managementnode/lib/VCL/Module/Provisioning/xCAT.pm

Modified: vcl/trunk/managementnode/lib/VCL/Module/Provisioning/xCAT.pm
URL: http://svn.apache.org/viewvc/vcl/trunk/managementnode/lib/VCL/Module/Provisioning/xCAT.pm?rev=1468102&r1=1468101&r2=1468102&view=diff
==============================================================================
--- vcl/trunk/managementnode/lib/VCL/Module/Provisioning/xCAT.pm (original)
+++ vcl/trunk/managementnode/lib/VCL/Module/Provisioning/xCAT.pm Mon Apr 15 14:50:27 2013
@@ -2211,14 +2211,14 @@ sub _is_throttle_limit_reached {
 
  Parameters  : none
  Returns     : nothing
- Description : Destroys the xCAT2.pm module and resets node to the boot state.
+ Description : Destroys the xCAT.pm module and resets node to the boot state.
 
 =cut
 
 sub DESTROY {
 	my $self = shift;
 	my $type = ref($self);
-	if ($type =~ /xCAT/) {
+	if ($type =~ /xCAT/ && $self->data) {
 		my $node = $self->data->get_computer_node_name(0);
 		my $request_state_name = $self->data->get_request_state_name(0);