--- loncom/interface/londocs.pm	2005/07/24 19:31:00	1.194
+++ loncom/interface/londocs.pm	2005/07/25 00:50:00	1.195
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.194 2005/07/24 19:31:00 raeburn Exp $
+# $Id: londocs.pm,v 1.195 2005/07/25 00:50:00 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1288,9 +1288,12 @@ sub process_secondary_uploads {
     my ($upload_output,$coursedom,$coursenum,$formname,$num,$newidx) = @_;
     my $folder=$env{'form.folder'};
     my $destination = 'docs/';
-    if ($folder eq 'default') {
+    if ($folder =~ /^supplemental/) {
+        $destination = 'supplemental/';
+    }
+    if (($folder eq 'default') || ($folder eq 'supplemental')) {
         $destination .= 'default/';
-    } elsif ($folder =~ /^default_(\d+)$/) {
+    } elsif ($folder =~ /^(default|supplemental)_(\d+)$/) {
         $destination .=  $1.'/';
     }
     $destination .= $newidx;