resource.$part{$_}.$name{$_},$symbp{$mapid} |
\n");
@@ -1425,7 +1427,7 @@ ENDMAPONE
foreach (@ids) {
my $rid = $_;
- my $uri=&Apache::lonnet::declutter($bighash{'src_'.$rid});
+ my $uri=&Apache::lonnet::declutter($uris{$rid});
#--------------------------------------------------------------------
# @catmarker contains list of all possible parameters including part #s
@@ -1477,7 +1479,7 @@ ENDMAPONE
foreach (sort keys %name) {
$r->print('