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);
                


Reply via email to