--- loncom/interface/spreadsheet/classcalc.pm	2005/04/07 06:56:23	1.23
+++ loncom/interface/spreadsheet/classcalc.pm	2006/04/06 20:24:13	1.26
@@ -1,5 +1,5 @@
 #
-# $Id: classcalc.pm,v 1.23 2005/04/07 06:56:23 albertel Exp $
+# $Id: classcalc.pm,v 1.26 2006/04/06 20:24:13 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -285,6 +285,8 @@ sub output_options {
     my $self = shift();
     return  ({value       => 'htmlclasslist',
               description => 'Student Sheet Links'},
+             {value       => 'source',
+              description => 'Show Source'},
              {value       => 'html',
               description => 'HTML'},
              {value       => 'excel',
@@ -404,7 +406,8 @@ sub compute {
         if ($connection->aborted()) { $self->cleanup(); return; }
         my $sname = $student->{'username'}.':'.$student->{'domain'};
 	my $studentsheet = Apache::studentcalc->new
-	    ($student->{'username'},$student->{'domain'},undef);
+	    ($student->{'username'},$student->{'domain'},undef,undef,
+	     $student->{'section'},$student->{'group'} );
         if ($connection->aborted()) { $self->cleanup(); return; }
 	my @exportdata = $studentsheet->export_data($r);
         if ($studentsheet->badcalc()) {