--- loncom/publisher/lonupload.pm	2001/12/17 00:57:59	1.10
+++ loncom/publisher/lonupload.pm	2002/08/05 02:22:56	1.11
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to upload files into construction space
 #
-# $Id: lonupload.pm,v 1.10 2001/12/17 00:57:59 harris41 Exp $
+# $Id: lonupload.pm,v 1.11 2002/08/05 02:22:56 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -156,6 +156,7 @@ sub phasetwo {
  'The extension on this file is not recognized by LON-CAPA.'.
  '</font>');
 	   } elsif (copy($source,$target)) {
+	       chmod(0660, $target); # Set permissions to rw-rw---.
 	      $r->print('File copied.');
               $r->print('<p><font size=+2><a href="'.$fn.
                         '">View file</a></font>');