--- lib/PXElator/client.pm 2009/08/12 23:59:01 208 +++ lib/PXElator/client.pm 2009/08/13 13:32:19 217 @@ -44,12 +44,6 @@ return $value; } -sub mac { - my $ip = shift; - my $mac = client::conf( $ip, 'mac' ) || return ''; - format::mac( $ip, @_ ); -} - sub next_ip($) { my $mac = shift; @@ -70,7 +64,9 @@ mkdir ip_path($ip); - symlink ip_path($ip), mac_path($mac); + my $mac_path = mac_path($mac); + unlink $mac_path if -e $mac_path; # XXX audit? + symlink ip_path($ip), $mac_path; write_file ip_path($ip,'mac'), $mac; return $ip;