--- loncom/interface/londocs.pm 2019/08/16 14:22:49 1.665 +++ loncom/interface/londocs.pm 2020/02/29 16:25:44 1.666 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.665 2019/08/16 14:22:49 raeburn Exp $ +# $Id: londocs.pm,v 1.666 2020/02/29 16:25:44 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1232,7 +1232,7 @@ sub update_paste_buffer { my @pathitems = split(/\&/,$env{'form.folderpath'}); my @folderconf = split(/\:/,$pathitems[-1]); - my $ispage = $folderconf[4]; + my $ispage = $folderconf[5]; foreach my $item (@possibles) { my ($orderidx,$cmd) = split(/:/,$item); @@ -5637,7 +5637,7 @@ sub handler { undef($env{'form.folderpath'}); } else { $folderurl = "uploaded/$coursedom/$coursenum/$folder"; - if ((split(/\:/,$pathitems[-1]))[4]) { + if ((split(/\:/,$pathitems[-1]))[5]) { $folderurl .= '.page'; } else { $folderurl .= '.sequence';