--- loncom/interface/lonnavmaps.pm 2002/12/02 14:19:38 1.119 +++ loncom/interface/lonnavmaps.pm 2003/01/10 17:46:46 1.123 @@ -2,7 +2,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.119 2002/12/02 14:19:38 bowersj2 Exp $ +# $Id: lonnavmaps.pm,v 1.123 2003/01/10 17:46:46 bowersj2 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -274,15 +274,13 @@ sub real_handler { my $foundJump = ($jumpType == $NOTHING); # look for jump point if we have one my $looped = 0; - $r->print($hereType); - # We only need to do this if we need to open the maps to show the # current position. This will change the counter so we can't count # for the jump marker with this loop. while ($depth > 0 && !$ENV{'form.alreadyHere'}) { if ($curRes == $mapIterator->BEGIN_MAP()) { $depth++; } if ($curRes == $mapIterator->END_MAP()) { $depth--; } - $r->print($curRes . ' '); + if (ref($curRes) && !$ENV{'form.alreadyHere'} && ($hereType == $SYMB && $curRes->symb() eq $here) || (ref($curRes) && $hereType == $URL && $curRes->src() eq $here)) { @@ -488,6 +486,10 @@ sub real_handler { '"'; my $title = $curRes->compTitle(); + if ($src=~/^\/uploaded\//) { + $nonLinkedText=$title; + $title=''; + } my $partLabel = ""; my $newBranchText = ""; @@ -983,12 +985,8 @@ sub new { return undef; } - # Now copy the hashes for speed (?) - my %realnav; my %realparm; - foreach (%navmaphash) { $realnav{$_} = $navmaphash{$_}; } - foreach (%parmhash) { $realparm{$_} = $navmaphash{$_}; } - $self->{NAV_HASH} = \%realnav; - $self->{PARM_HASH} = \%realparm; + $self->{NAV_HASH} = \%navmaphash; + $self->{PARM_HASH} = \%parmhash; bless($self); $self->untieHashes();