--- loncom/interface/lonnavmaps.pm 2005/04/15 22:03:23 1.326 +++ loncom/interface/lonnavmaps.pm 2005/06/01 02:02:41 1.328 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.326 2005/04/15 22:03:23 albertel Exp $ +# $Id: lonnavmaps.pm,v 1.328 2005/06/01 02:02:41 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2116,8 +2116,6 @@ sub generate_course_user_opt { my $cdom=$env{'course.'.$cid.'.domain'}; my $cnum=$env{'course.'.$cid.'.num'}; - my $useropt; my $courseopt; - # ------------------------------------------------- Get coursedata (if present) my $courseopt=&Apache::lonnet::get_courseresdata($cnum,$cdom); # Check for network failure @@ -3502,6 +3500,15 @@ sub shown_symb { if ($self->encrypted()) {return &Apache::lonenc::encrypted($self->symb());} return $self->symb(); } +sub id { + my $self=shift; + return $self->{ID}; +} +sub enclosing_map_src { + my $self=shift; + (my $first, my $second) = $self->{ID} =~ /(\d+).(\d+)/; + return $self->navHash('map_id_'.$first); +} sub symb { my $self=shift; (my $first, my $second) = $self->{ID} =~ /(\d+).(\d+)/;