--- loncom/lonnet/perl/lonnet.pm 2020/01/17 04:51:33 1.1417 +++ loncom/lonnet/perl/lonnet.pm 2020/01/17 16:43:02 1.1418 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1417 2020/01/17 04:51:33 raeburn Exp $ +# $Id: lonnet.pm,v 1.1418 2020/01/17 16:43:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3686,13 +3686,13 @@ sub can_edit_resource { $cfile = $template; } } elsif (($resurl =~ m{^/adm/wrapper/ext/}) && ($env{'form.folderpath'} =~ /^supplemental/)) { - $incourse = 1; - if ($env{'form.forceedit'}) { - $forceview = 1; - } else { - $forceedit = 1; - } - $cfile = $resurl; + $incourse = 1; + if ($env{'form.forceedit'}) { + $forceview = 1; + } else { + $forceedit = 1; + } + $cfile = $resurl; } elsif (($resurl =~ m{^/adm/wrapper/adm/$cdom/$cnum/\d+/ext\.tool$}) && ($env{'form.folderpath'} =~ /^supplemental/)) { $incourse = 1; if ($env{'form.forceedit'}) {