--- loncom/interface/spreadsheet/studentcalc.pm	2014/02/12 16:55:36	1.46
+++ loncom/interface/spreadsheet/studentcalc.pm	2017/12/31 15:27:03	1.47
@@ -1,5 +1,5 @@
 #
-# $Id: studentcalc.pm,v 1.46 2014/02/12 16:55:36 bisitz 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;