--- loncom/interface/groupsort.pm 2016/11/22 13:51:29 1.75 +++ loncom/interface/groupsort.pm 2017/05/30 15:10:57 1.76 @@ -2,7 +2,7 @@ # The LON-CAPA group sort handler # Allows for sorting prior to import into RAT. # -# $Id: groupsort.pm,v 1.75 2016/11/22 13:51:29 raeburn Exp $ +# $Id: groupsort.pm,v 1.76 2017/05/30 15:10:57 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -205,7 +205,9 @@ sub handler { # permissions checking my ($allowed,$canedit,$context,$cid); - if ($env{'form.readfile'} =~ m{^/uploaded/($match_domain)/($match_courseid)/}) { + if ($env{'form.readfile'} eq '') { + $allowed = 1; + } elsif ($env{'form.readfile'} =~ m{^/uploaded/($match_domain)/($match_courseid)/}) { my ($cdom,$cnum) = ($1,$2); $cid = $cdom.'_'.$cnum; $context = 'course'; @@ -219,8 +221,6 @@ sub handler { (&Apache::lonnet::allowed('bro',$env{'form.readfile'}))) { $allowed = 1; } - } elsif (($env{'form.readfile'} eq '') && ($env{'form.acts'} ne '')) { - $allowed = 1; } if ($allowed) { if ($env{'form.mode'} eq 'rat') {