--- loncom/interface/lonnavmaps.pm	2006/05/11 21:55:37	1.349.2.7
+++ loncom/interface/lonnavmaps.pm	2006/05/15 23:51:34	1.349.2.9
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.349.2.7 2006/05/11 21:55:37 albertel Exp $
+# $Id: lonnavmaps.pm,v 1.349.2.9 2006/05/15 23:51:34 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2502,7 +2502,7 @@ sub parmval_real {
     my $result='';
 
     my ($mapname,$id,$fn)=&Apache::lonnet::decode_symb($symb);
-
+    $mapname = &Apache::lonnet::deversion($mapname);
 # ----------------------------------------------------- Cascading lookup scheme
     my $rwhat=$what;
     $what=~s/^parameter\_//;
@@ -3797,20 +3797,20 @@ Returns a string with the type of the ma
 sub map_finish {
     my $self = shift;
     my $src = $self->src();
-    $src = &Apache::lonnet::deversion(&Apache::lonnet::clutter($src));
+    $src = &Apache::lonnet::clutter($src);
     my $res = $self->navHash("map_finish_$src", 0);
     $res = $self->{NAV_MAP}->getById($res);
     return $res;
 }
 sub map_pc {
     my $self = shift;
-    my $src = &Apache::lonnet::deversion($self->src());
+    my $src = $self->src();
     return $self->navHash("map_pc_$src", 0);
 }
 sub map_start {
     my $self = shift;
     my $src = $self->src();
-    $src = &Apache::lonnet::deversion(&Apache::lonnet::clutter($src));
+    $src = &Apache::lonnet::clutter($src);
     my $res = $self->navHash("map_start_$src", 0);
     $res = $self->{NAV_MAP}->getById($res);
     return $res;