[LON-CAPA-cvs] cvs: loncom /interface lonnavmaps.pm

[albertel]

albertel		Wed Sep  3 16:27:08 2003 EDT

  Modified files:              
    /loncom/interface	lonnavmaps.pm 
  Log:
  - symbs don't have versions in them, symb clean takes care of this for us.
  
  
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.222 loncom/interface/lonnavmaps.pm:1.223
--- loncom/interface/lonnavmaps.pm:1.222	Tue Aug 19 11:29:33 2003
+++ loncom/interface/lonnavmaps.pm	Wed Sep  3 16:27:08 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Navigate Maps Handler
 #
-# $Id: lonnavmaps.pm,v 1.222 2003/08/19 15:29:33 bowersj2 Exp $
+# $Id: lonnavmaps.pm,v 1.223 2003/09/03 20:27:08 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3030,9 +3030,9 @@
     my $self=shift;
     (my $first, my $second) = $self->{ID} =~ /(\d+).(\d+)/;
     my $symbSrc = &Apache::lonnet::declutter($self->src());
-    return &Apache::lonnet::declutter(
-         $self->navHash('map_id_'.$first)) 
+    my $symb = &Apache::lonnet::declutter($self->navHash('map_id_'.$first)) 
         . '___' . $second . '___' . $symbSrc;
+    return &Apache::lonnet::symbclean($symb);
 }
 sub title { 
     my $self=shift;