--- loncom/interface/lonnavmaps.pm 2004/05/27 22:25:14 1.260 +++ loncom/interface/lonnavmaps.pm 2004/06/28 15:09:13 1.263 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.260 2004/05/27 22:25:14 albertel Exp $ +# $Id: lonnavmaps.pm,v 1.263 2004/06/28 15:09:13 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -137,7 +137,9 @@ sub real_handler { $r->print(''. &Apache::loncommon::bodytag('Navigate Course Contents','', $addentries,'','',$ENV{'form.register'})); - $r->print(''); + $r->print(''. + &Apache::loncommon::help_open_topic('Navigation_Screen'). + &Apache::loncommon::help_open_bug('RAT')); $r->rflush(); @@ -3241,6 +3243,17 @@ sub is_sequence { return $self->navHash("is_map_", 1) && $self->navHash("map_type_" . $self->map_pc()) eq 'sequence'; } +sub is_survey { + my $self = shift(); + my $part = shift(); + if ($self->parmval('type',$part) eq 'survey') { + return 1; + } + if ($self->src() =~ /\.(survey)$/) { + return 1; + } + return 0; +} # Private method: Shells out to the parmval in the nav map, handler parts. sub parmval {