Changeset 315


Ignore:
Timestamp:
Jul 19, 2018, 9:23:39 AM (6 years ago)
Author:
g7moreau
Message:
  • one } no need
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ddt/ddt

    r314 r315  
    14611461         my ($mac_address, $attribute) = %{$computer};
    14621462
    1463             $computer_index++ and next LOOP_ON_COMPUTER if $attribute->{'hostname'} ne $hostname;
    1464 
    1465             if ($attribute->{'address_type'} eq 'pool-dhcp') {
    1466                die "Error: Host remove $hostname from the domain set $domainset [FAILED]" .
    1467                   " ... The host $hostname belongs to a DHCP pool.\n";
    1468                }
    1469 
    1470             splice(@{$computer_db->{$domainset}}, $computer_index => 1);
    1471             ipamdb_save("$COMPUTER_YAML", $computer_db);
    1472             print "Info: Host $hostname has been removed from the domain set $domainset [OK]\n";
    1473             exit;
    1474             }
     1463         $computer_index++ and next LOOP_ON_COMPUTER if $attribute->{'hostname'} ne $hostname;
     1464
     1465         if ($attribute->{'address_type'} eq 'pool-dhcp') {
     1466            die "Error: Host remove $hostname from the domain set $domainset [FAILED]" .
     1467               " ... The host $hostname belongs to a DHCP pool.\n";
     1468            }
     1469
     1470         splice(@{$computer_db->{$domainset}}, $computer_index => 1);
     1471         ipamdb_save("$COMPUTER_YAML", $computer_db);
     1472         print "Info: Host $hostname has been removed from the domain set $domainset [OK]\n";
     1473         exit;
    14751474         }
    14761475      }
Note: See TracChangeset for help on using the changeset viewer.