Mercurial > hg > octave-nkf

diff scripts/miscellaneous/delete.m @ 6405:b298a4c12fc3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-03-14 16:51:28 by jwe]
author jwe
date Wed, 14 Mar 2007 16:51:30 +0000
parents 44c91c5dfe1d
children 93c65f2a5668
line wrap: on
line diff
--- a/scripts/miscellaneous/delete.m
+++ b/scripts/miscellaneous/delete.m
@@ -32,8 +32,11 @@
   if (nargin == 1)
     if (ischar (arg))
       unlink (arg);
+    elseif (ishandle (arg))
+      ## Delete a graphics object.
+      __go_delete__ (arg);
     else
-      __uiobject_delete__ (arg);
+      error ("delete: expecting argument to be a filename or graphics handle");
     endif
   else
     print_usage ();