--- loncom/interface/londocs.pm	2023/01/19 17:06:21	1.484.2.93.2.7
+++ loncom/interface/londocs.pm	2023/01/20 16:30:43	1.484.2.93.2.8
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.484.2.93.2.7 2023/01/19 17:06:21 raeburn Exp $
+# $Id: londocs.pm,v 1.484.2.93.2.8 2023/01/20 16:30:43 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6404,7 +6404,8 @@ my %suporderhash = (
         }
     } elsif ($supplementalflag) {
         my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$crstype,
-                            $supplementalflag,'',$iconpath,$pathitem,'',$hostname);
+                            $supplementalflag,'',$iconpath,$pathitem,'',$canedit,
+                            $hostname);
         if ($error) {
             $r->print('<p><span class="LC_error">'.$error.'</span></p>');
         }