# HG changeset patch
# User Ben Abbott <address@hidden>
# Date 1223335199 14400
# Node ID e0c2d03d57c62137ba33a945863c6c029ecbef82
# Parent  23ff439ea0dd90e14f8dd3c9f187a45d4c52db4b
delete.m: Permit a vector of handles to be deleted.

diff -r 23ff439ea0dd -r e0c2d03d57c6 scripts/ChangeLog
--- a/scripts/ChangeLog	Mon Oct 06 16:16:04 2008 -0400
+++ b/scripts/ChangeLog	Mon Oct 06 19:19:59 2008 -0400
@@ -1,3 +1,7 @@
+2008-10-06  Ben Abbott <address@hidden>
+
+	* miscellaneous/delete.m: Permit a vector of handles to be deleted..
+
 2008-10-02  John W. Eaton  <address@hidden>
 
 	* pkg/pkg.m (configure_make): Handle filenames with spaces.
diff -r 23ff439ea0dd -r e0c2d03d57c6 scripts/miscellaneous/delete.m
--- a/scripts/miscellaneous/delete.m	Mon Oct 06 16:16:04 2008 -0400
+++ b/scripts/miscellaneous/delete.m	Mon Oct 06 19:19:59 2008 -0400
@@ -19,7 +19,7 @@
 ## -*- texinfo -*-
 ## @deftypefn {Function File} {} delete (@var{file})
 ## @deftypefnx {Function File} {} delete (@var{h})
-## Delete the named file or figure handle.
+## Delete the named file or graphics handle.
 ## @end deftypefn
 
 ## PKG_ADD: mark_as_command delete
@@ -31,9 +31,11 @@
   if (nargin == 1)
     if (ischar (arg))
       unlink (arg);
-    elseif (ishandle (arg))
+    elseif (all (ishandle (arg)))
       ## Delete a graphics object.
-      __go_delete__ (arg);
+      for n = 1:numel(arg)
+         __go_delete__ (arg(n));
+      endfor
     else
       error ("delete: expecting argument to be a filename or graphics handle");
     endif