Commit 516dec51 authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix; slot name is IP, not ip.

parent 07b23bde
#!/usr/bin/perl -wT
#!/usr/bin/perl -w
#
# EMULAB-COPYRIGHT
......@@ -452,7 +452,7 @@ if ($showlinks) {
"order by v.vname,v.member");
while (my %row = $link_result->fetchhash()) {
my $ip = $row{"ip"};
my $ip = $row{"IP"};
my $mac = $row{"mac"};
my $lan = $row{"vname"};
my $vnode = $row{"vnode"};
......@@ -462,8 +462,8 @@ if ($showlinks) {
# Do not bother if no info.
next
if (!defined($iface));
if (!defined($ip));
if ($mac =~ /^(\w{2})(\w{2})(\w{2})(\w{2})(\w{2})(\w{2})$/) {
$mac = "$1:$2:$3:$4:$5:$6";
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment