Mercurial > octave-libgccjit

diff scripts/plot/clf.m @ 11941:c2bfc6440e18 release-3-0-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
one more fix from M. Caliari
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 25 Mar 2009 15:09:48 +0100
parents dabbfac27a45
children
line wrap: on
line diff
--- a/scripts/plot/clf.m	Wed Feb 25 08:47:27 2009 +0100
+++ b/scripts/plot/clf.m	Wed Mar 25 15:09:48 2009 +0100
@@ -71,7 +71,11 @@
     hc = get (hfig, "children");
   endif
 
+  set (hfig, "currentaxes", []);
   ## Delete the children.
-  delete (hc);
-
+  for k = get (hfig, "children")
+    if (ishandle (k))
+      delete (k);
+    endif
+  endfor
 endfunction