--- loncom/interface/lonnavmaps.pm 2008/01/24 22:12:02 1.411 +++ loncom/interface/lonnavmaps.pm 2008/06/10 13:49:05 1.413 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.411 2008/01/24 22:12:02 raeburn Exp $ +# $Id: lonnavmaps.pm,v 1.413 2008/06/10 13:49:05 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -854,7 +854,10 @@ sub render_resource { if (!$resource->condval()) { $nonLinkedText .= ' ('.&mt('conditionally hidden').') '; } - + if (($resource->is_practice()) && ($resource->is_raw_problem())) { + $nonLinkedText .=' '.&mt('not graded').''; + } + # We're done preparing and finally ready to start the rendering my $result = ""; @@ -3610,6 +3613,15 @@ sub is_problem { } return 0; } +sub is_raw_problem { + my $self=shift; + my $src = $self->src(); + if ($src =~ /\.(problem|exam|quiz|assess|survey|form|library|task)$/) { + return 1; + } + return 0; +} + sub contains_problem { my $self=shift; if ($self->is_page()) {