--- loncom/homework/edit.pm 2022/12/31 14:08:59 1.156 +++ loncom/homework/edit.pm 2023/03/27 18:41:06 1.157 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # edit mode helpers # -# $Id: edit.pm,v 1.156 2022/12/31 14:08:59 raeburn Exp $ +# $Id: edit.pm,v 1.157 2023/03/27 18:41:06 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1214,6 +1214,7 @@ sub browse_or_search { upfi => 'Upload File', dire => 'Directory', news => 'New sub-directory', + empd => 'No suitable resources found', ); my ($importcrsres,$uploadfile,$allonly); if ($only) { @@ -1229,14 +1230,24 @@ sub browse_or_search { $importcrsres=(< $lt{'uacf'} + +
+

+ $lt{'empd'} +

+
CRSRES my %subdirs; my $toppath="/priv/$cdom/$cnum"; my $exclude = &Apache::lonnet::priv_exclude(); - &Apache::lonnet::recursedirs(1,1,'',$exclude,'',$toppath,'',\%subdirs); + &Apache::lonnet::recursedirs(1,1,'',$exclude,'',0,$toppath,'',\%subdirs); my $numcrsdirs = keys(%subdirs); my $pickdir = $lt{'dire'}.'