--- loncom/interface/londocs.pm	2010/08/16 20:52:11	1.434.2.1
+++ loncom/interface/londocs.pm	2010/11/09 18:19:08	1.434.2.2
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.434.2.1 2010/08/16 20:52:11 raeburn Exp $
+# $Id: londocs.pm,v 1.434.2.2 2010/11/09 18:19:08 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1717,10 +1717,9 @@ sub process_file_upload {
             $destination .=  $2.'/';
         }
 # this is for a course, not a user, so set coursedoc flag
-# probably the only place in the system where this should be "1"
         my $newidx=&LONCAPA::map::getresidx();
         $destination .= $newidx;
-        my $url=&Apache::lonnet::userfileupload('uploaddoc',1,$destination,
+        my $url=&Apache::lonnet::userfileupload('uploaddoc','coursedoc',$destination,
 						$parseaction,$allfiles,
 						$codebase);
         my $ext='false';
@@ -1781,7 +1780,7 @@ sub process_secondary_uploads {
     }
     $destination .= $newidx;
     my ($url,$filename);
-    $url=&Apache::lonnet::userfileupload($formname.$num,1,$destination);
+    $url=&Apache::lonnet::userfileupload($formname.$num,'coursedoc',$destination);
     ($filename) = ($url =~ m{^/uploaded/\Q$coursedom\E/\Q$coursenum\E/\Q$destination\E/(.+)$});
     return $filename;
 }
@@ -2971,7 +2970,7 @@ CHBO
 	$fileupload
 	<br />
 	$lt{'title'}:<br />
-	<input type="text" size="50" name="comment" />
+	<input type="text" size="80" name="comment" />
 	$uploadtag
 	<input type="hidden" name="cmd" value="upload_default" />
 	<br />