--- loncom/interface/lonprintout.pm	2006/03/14 23:24:46	1.429
+++ loncom/interface/lonprintout.pm	2006/03/15 16:17:53	1.430
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.429 2006/03/14 23:24:46 foxr Exp $
+# $Id: lonprintout.pm,v 1.430 2006/03/15 16:17:53 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1471,7 +1471,7 @@ ENDPART
 	 my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$#students+1,'inline','75');
 	 my $student_counter=-1;
 	 my $i = 0;
-	 my ($junku, $junkd, $last_section) = split /:/,$students[0];
+	 my $last_section = (split(/:/,$students[0]))[2];
 	 foreach my $person (@students) {
 
              my $duefile="/home/httpd/prtspool/$env{'user.name'}_$env{'user.domain'}_printout.due";
@@ -1481,8 +1481,7 @@ ENDPART
 	     }
 	     $student_counter++;
 	     if ($split_on_sections) {
-		 my $this_section;
-		 ($junku, $junkd, $this_section) = split /:/,$person;
+		 my $this_section = (split(/:/,$person))[2];
 		 if ($this_section ne $last_section) {
 		     $i++;
 		     $last_section = $this_section;