--- lib/PXElator/httpd.pm 2009/08/13 12:45:30 215 +++ lib/PXElator/httpd.pm 2009/08/13 13:06:18 216 @@ -203,10 +203,10 @@ my $deploy; - if ( my $mac = client::mac( $ip ) ) { + if ( my $mac = client::mac_from_ip( $ip ) ) { $deploy = client::conf( $ip, 'deploy' => $param->{deploy} ); push @table, ( - 'mac' => $mac, + 'mac' => format::mac( $mac => 'html' ), 'deploy' => html::select( 'deploy', $deploy, config::available ) ); $deploy = qq|

PXElinux

| . html::pre( config::for_ip( $ip ) ); @@ -243,13 +243,14 @@ map { my $ip = $_; $ip =~ s{^.+/ip/}{}; - my $arp = $arp->{ client::mac $ip, 'clean' }; + my $mac = client::mac_from_ip $ip; + my $arp = $arp->{ $mac }; $arp = $arp ? $arp->[1] : ''; $arp =~ s{$ip}{}; ( qq|$ip| , client::conf( $ip, 'hostname' ) - , client::mac( $ip ) + , format::mac( $mac => 'html' ) , html::tt( client::conf( $ip, 'deploy' ) ) , $arp ); @@ -260,7 +261,7 @@ , html::table( -3, 'mac', 'dev', 'ip', map { my $c = $arp->{$_}; - ( html::tt( $_ ), $c->[1], $c->[0] ) + ( format::mac( $_ => 'html' ), $c->[1], $c->[0] ) } sort keys %$arp ) ;