--- lib/PXElator/httpd.pm 2009/08/27 12:42:53 303
+++ lib/PXElator/httpd.pm 2009/08/27 14:31:15 306
@@ -262,10 +262,9 @@
print $client ok
, qq|
Clients on $server::ip
|
, html::table( -5,
- 'ip', 'mac', 'hostname', 'deploy', 'arp',
+ 'ip', 'mac', 'hostname', 'conf', 'arp',
map {
my $ip = $_;
- $ip =~ s{^.+/ip/}{};
my $mac = client::mac_from_ip $ip;
my $arp = $arp->{ $mac };
$arp = $arp ? $arp->[1] : '';
@@ -274,11 +273,16 @@
qq|$ip|
, format::mac( $mac => 'html' )
, client::conf( $ip, 'hostname' )
- , html::tt( client::conf( $ip, 'deploy' ) )
+ , html::pre_dump( client::all_conf( $ip ) )
, $arp
);
}
- glob("$server::conf/ip/*")
+ sort { ip::to_int($a) cmp ip::to_int($b) }
+ map {
+ my $ip = $_;
+ $ip =~ s{^.+/ip/}{};
+ $ip;
+ } glob("$server::conf/ip/*")
)
, qq|ARP
|
, html::table( -3, 'ip', 'mac', 'dev',