--- loncom/interface/londocs.pm 2013/08/18 17:32:28 1.484.2.39 +++ loncom/interface/londocs.pm 2013/09/01 03:21:46 1.484.2.40 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.484.2.39 2013/08/18 17:32:28 raeburn Exp $ +# $Id: londocs.pm,v 1.484.2.40 2013/09/01 03:21:46 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5150,7 +5150,7 @@ sub remove_archive { my $currcmd = $env{'form.cmd'}; my $position = $env{'form.position'}; if ($position > 0) { - $env{'form.cmd'} = 'del_'.$position; + $env{'form.cmd'} = 'remove_'.$position; my ($title,$url,@rrest) = split(/:/,$LONCAPA::map::resources[$LONCAPA::map::order[$position]]); if (&handle_edit_cmd($docuname,$docudom)) {