Commit 2da4652d authored by Russ Fish's avatar Russ Fish

Link to nodes normally on the pc600wifi map.

parent 5d304b8a
......@@ -797,9 +797,11 @@ sub dofloor($$)
}
}
# Link to a special page for the pc600 Wifi Cluster nodes.
# Link to a special page for the pc600 Wifi Cluster nodes,
# except on their own map.
my $ispc600wifi = defined($rowref->{"feature"}) &&
$rowref->{"feature"} eq "pc600wifi";
$rowref->{"feature"} eq "pc600wifi" &&
$building ne $pc600wifi_bldg;
$props->{'ISPC600WIFI'} = $ispc600wifi;
my $x2 = $x + $DOT_RAD;
......@@ -881,7 +883,7 @@ sub dofloor($$)
($o > 180.0 && $o < 360.0)));
# No labels on the pc600 wifi cluster nodes, except on their own map.
if (!$ispc600wifi || $building eq $pc600wifi_bldg) {
if (!$ispc600wifi) {
$err = $baseimage->Annotate(fill=>'black', x=>$lx, y=>$ly,
text=>"$label");
warn "$err" if "$err";
......
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