-Fix syntax errors

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6490 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2010-06-16 18:57:36 +00:00
parent 1bb7712ae1
commit 04cc2a0c2a

View File

@ -41,7 +41,7 @@ my %dynamicranges; #track dynamic ranges defined to see if a host that resolves
sub ipIsDynamic {
my $ip = shift;
$number = inet_aton($ip);
my $number = inet_aton($ip);
unless ($number) { # shouldn't be possible, but pessimistically presume it dynamically if so
return 1;
}
@ -1165,7 +1165,7 @@ sub addnet
my $begin;
my $end;
($begin,$end) = split / /,$trange;
%dynamicranges{$trange}=[unpack("N*",inet_aton($begin)),unpack("N*",inet_aton($end))];
$dynamicranges{$trange}=[unpack("N*",inet_aton($begin)),unpack("N*",inet_aton($end))];
unless ($ent->{dhcpserver}
and xCAT::Utils->thishostisnot($ent->{dhcpserver}))
{ #If specific, only one dhcp server gets a dynamic range