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