Mercurial > hg > octave-nkf

diff scripts/plot/clf.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 3483cce84528
line wrap: on
line diff
--- a/scripts/plot/clf.m
+++ b/scripts/plot/clf.m
@@ -27,12 +27,9 @@
 function clf ()
 
   if (nargin == 0)
-    f = gcf ();
-    obj = get (f);
-    for child = obj.children
-      delete (child);
+    for k = get (gcf (), children)
+      delete (k);
     endfor
-    set (f, "currentaxes", []);
     drawnow ();
   else
     print_usage ();