--- loncom/interface/lonrelrequtils.pm 2018/01/03 04:20:54 1.7 +++ loncom/interface/lonrelrequtils.pm 2022/10/19 00:03:10 1.8 @@ -1,7 +1,7 @@ #!/usr/bin/perl # The LearningOnline Network # -# $Id: lonrelrequtils.pm,v 1.7 2018/01/03 04:20:54 raeburn Exp $ +# $Id: lonrelrequtils.pm,v 1.8 2022/10/19 00:03:10 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -520,11 +520,7 @@ sub coursecontent_constraints { $Apache::lonrelrequtils::randomizetry{minor},$reqdmajor,$reqdminor); } } - my $suppmap = 'supplemental.sequence'; - my ($suppcount,$suppexttools,$errors) = (0,0,0); - ($suppcount,$suppexttools,$errors) = - &Apache::loncommon::recurse_supplemental($cnum,$cdom,$suppmap,$suppcount,$suppexttools,$errors); - if ($suppexttools) { + if (&Apache::lonnet::count_supptools($cnum,$cdom,1,1)) { ($reqdmajor,$reqdminor) = &update_reqd_loncaparev($Apache::lonrelrequtils::exttool{major}, $Apache::lonrelrequtils::exttool{minor}); }