--- loncom/interface/multidownload.pl	2007/05/23 19:07:49	1.32
+++ loncom/interface/multidownload.pl	2007/05/23 19:31:21	1.33
@@ -2,7 +2,7 @@
 # CGI-script to allow download of all essay submissions of 
 # multiple students.
 #
-# $Id: multidownload.pl,v 1.32 2007/05/23 19:07:49 banghart Exp $
+# $Id: multidownload.pl,v 1.33 2007/05/23 19:31:21 banghart Exp $
 # Copyright Michigan State University Board of Trustees
 #
 # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
@@ -131,6 +131,7 @@ if (&Apache::lonnet::allowed('vgr',$scop
         my %record = &Apache::lonnet::restore($symb,$courseid,$studom,$stuname);
         my $file_url = '/uploaded/'.$studom.'/'.$stuname.'/portfolio';
         print MANIFEST ($fullname."\n");
+        my $submission_count = 0;
         foreach my $partid (@$partlist) {
             my @ids = $res->responseIds($partid);
             foreach my $respid(@ids) {
@@ -140,9 +141,9 @@ if (&Apache::lonnet::allowed('vgr',$scop
                     $file = $file_url.$file;
                     my ($file_name_only) = ($file =~ /^.*\/(.+$)/);
                     print MANIFEST ("\t$file_name_only \n");
+                    $submission_count ++;
                     &Apache::lonnet::repcopy($file);
                     my $source = &Apache::lonnet::filelocation("",$file);
-                    
                     my $destination = "$doc_zip_root/zipdir/$unique_user/$unique_path/$stuname$part_resp_path/$file_name_only";
                     if (exists($files_saved{$destination})) {
                         # file has already been saved once
@@ -161,6 +162,9 @@ if (&Apache::lonnet::allowed('vgr',$scop
                 }
             }
         }
+        if (!$submission_count) {
+            print MANIFEST ("\tNo Files Submitted \n");
+        }
     }
     
     &mkpath($doc_zip_root."/zipout/$unique_user",0,0700);