--- loncom/interface/lonprintout.pm	2004/06/28 15:02:55	1.310
+++ loncom/interface/lonprintout.pm	2004/06/28 18:12:30	1.311
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.310 2004/06/28 15:02:55 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.311 2004/06/28 18:12:30 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1033,6 +1033,11 @@ ENDPART
 	 my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$#students+1);
 	 my $student_counter=-1;
 	 foreach my $person (@students) {
+             my $duefile="/home/httpd/prtspool/$ENV{'user.name'}_$ENV{'user.domain'}_printout.due";
+	     if (-e $duefile) {
+		 my $temp_file = Apache::File->new('>>'.$duefile);
+		 print $temp_file "1969\n";
+	     }
 	     $student_counter++;
 	     my $i=int($student_counter/$helper->{'VARS'}{'NUMBER_TO_PRINT'});
 	     my ($output,$fullname)=&print_resources($r,$helper,$person,$type,\%moreenv,\@master_seq,$flag_latex_header_remove);