--- loncom/interface/spreadsheet/studentcalc.pm 2010/06/14 01:30:54 1.45 +++ loncom/interface/spreadsheet/studentcalc.pm 2017/12/31 15:27:03 1.47 @@ -1,5 +1,5 @@ # -# $Id: studentcalc.pm,v 1.45 2010/06/14 01:30:54 raeburn Exp $ +# $Id: studentcalc.pm,v 1.47 2017/12/31 15:27:03 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -105,7 +105,7 @@ sub initialize_sequence_cache { unshift(@all_sequences,$toplevelseq); } foreach my $sequence (@all_sequences) { - if ($navmap->hasResource($sequence,sub { shift->is_problem(); }, 0,1)){ + if ($navmap->hasResource($sequence,sub { shift->is_gradable(); }, 0,1)){ push(@Sequences,$sequence); &get_resources($sequence); } @@ -120,7 +120,7 @@ sub get_resources { } return () if (! defined($navmap) || ! ref($navmap)); my @resources = $navmap->retrieveResources($seq, - sub { shift->is_problem(); }, + sub { shift->is_gradable(); }, 0,0,1); $res_memoize{$seq->symb()}=\@resources; return @resources; @@ -307,7 +307,7 @@ END } else { $row_output .= 'Go To'; + '">'.&mt('Go To').''; $row_output .= ''.$resource->compTitle.''; } if ($self->blackout() && $self->{'blackout_rows'}->{$rownum}>0) {