--- loncom/interface/statistics/lonstathelpers.pm	2009/05/06 16:19:42	1.59
+++ loncom/interface/statistics/lonstathelpers.pm	2010/09/11 19:08:23	1.59.12.1
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstathelpers.pm,v 1.59 2009/05/06 16:19:42 bisitz Exp $
+# $Id: lonstathelpers.pm,v 1.59.12.1 2010/09/11 19:08:23 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -262,14 +262,29 @@ END
         (' 'x4).
         '<a href="javascript:checkall(false)">'.&mt('Unselect All').'</a>';
     $Str .= $/.'<table>'.$/;
-    my $iterator = $navmap->getIterator(undef, undef, undef, 1);
-    my $sequence_string;
+    my ($iterator,$sequence_string,@Accumulator);
     my $seq_id = 0;
-    my @Accumulator = (&new_accumulator($env{'course.'.$cid.'.description'},
-                                        '',
-                                        '',
-                                        $seq_id++,
-                                        $inputname));
+    if (&Apache::loncommon::needs_gci_custom()) {
+        my $cdom = $env{'course.'.$cid.'.domain'};
+        my $cnum = $env{'course.'.$cid.'.num'};
+        my $mapurl = "/uploaded/$cdom/$cnum/default_1261144274.sequence";
+        my $map = $navmap->getResourceByUrl($mapurl);
+        my $firstResource = $map->map_start();
+        my $lastResource = $map->map_finish();
+        $iterator = $navmap->getIterator($firstResource,$lastResource,undef,1);
+        @Accumulator = (&new_accumulator($map->compTitle,
+                                         $map->src,
+                                         $map->symb,
+                                         $seq_id++,
+                                         $inputname));
+    } else {
+        $iterator = $navmap->getIterator(undef, undef, undef, 1);
+        @Accumulator = (&new_accumulator($env{'course.'.$cid.'.description'},
+                                         '',
+                                         '',
+                                         $seq_id++,
+                                         $inputname));
+    }
     my @Sequence_Data;
     while (my $curRes = $iterator->next()) {
         if ($curRes == $iterator->END_MAP) {