version 1.124, 2007/08/29 00:50:50
|
version 1.127, 2007/12/01 03:43:49
|
Line 210 sub loadmap {
|
Line 210 sub loadmap {
|
$hash{'type_'.$from_rid}='finish'; |
$hash{'type_'.$from_rid}='finish'; |
} |
} |
|
|
my $parser = HTML::TokeParser->new(\$instr); |
$parser = HTML::TokeParser->new(\$instr); |
$parser->attr_encoded(1); |
$parser->attr_encoded(1); |
# last parse out the mapalias params so as to ignore anything |
# last parse out the mapalias params so as to ignore anything |
# refering to non-existant resources |
# refering to non-existant resources |
Line 471 sub traceroute {
|
Line 471 sub traceroute {
|
if (defined($hash{'map_start_'.$hash{'src_'.$rid}})) { |
if (defined($hash{'map_start_'.$hash{'src_'.$rid}})) { |
$sofar=$newsofar= |
$sofar=$newsofar= |
&traceroute($sofar, |
&traceroute($sofar, |
$hash{'map_start_'.$hash{'src_'.$rid}},'&', |
$hash{'map_start_'.$hash{'src_'.$rid}}, |
|
$beenhere, |
$encflag || $encurl{$rid}, |
$encflag || $encurl{$rid}, |
$hdnflag || $hiddenurl{$rid}); |
$hdnflag || $hiddenurl{$rid}); |
} |
} |
Line 837 sub evalstate {
|
Line 838 sub evalstate {
|
$count++; |
$count++; |
} |
} |
my ($mapid) = split(/\./,$id); |
my ($mapid) = split(/\./,$id); |
&mt('[_1] in [_2]', $hash{'title_'.$id}, |
&mt('Resource "[_1]" <br /> in Map "[_2]"', |
|
$hash{'title_'.$id}, |
$hash{'title_'.$hash{'ids_'.$hash{'map_id_'.$mapid}}}); |
$hash{'title_'.$hash{'ids_'.$hash{'map_id_'.$mapid}}}); |
} (@{ $mapalias_cache{$mapalias} })); |
} (@{ $mapalias_cache{$mapalias} })); |
next if ($count < 2); |
next if ($count < 2); |