--- loncom/interface/londocs.pm	2012/01/31 23:47:15	1.476
+++ loncom/interface/londocs.pm	2012/02/28 02:02:16	1.477
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.476 2012/01/31 23:47:15 raeburn Exp $
+# $Id: londocs.pm,v 1.477 2012/02/28 02:02:16 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -26,8 +26,6 @@
 # http://www.lon-capa.org/
 #
 
-
-
 package Apache::londocs;
 
 use strict;
@@ -1121,6 +1119,7 @@ sub process_file_upload {
                     newidx     => $newidx,
                     position   => $position,
                     phase      => $nextphase,
+                    comment    => $comment,
                 ); 
                 $$upload_output = $showupload.
                                   &Apache::loncommon::decompress_form($mimetype,
@@ -2974,6 +2973,9 @@ sub decompression_info {
     if ($env{'form.newidx'}) {
         $hiddenelem .= '<input type="hidden" name="newidx" value="'.$env{'form.newidx'}.'" />'."\n";
     }
+    if ($env{'form.comment'}) {
+        $hiddenelem .= '<input type="hidden" name="comment" value="'.$env{'form.comment'}.'" />'."\n";
+    }
     return ($destination,$dir_root,$londocroot,$docudom,$docuname,$container,
             $hiddenelem);
 }