Mercurial > hg > octave-nkf

comparison 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
comparison
equal deleted inserted replaced
6404:2005c0169e36 6405:b298a4c12fc3
25 ## Author: jwe 25 ## Author: jwe
26 26
27 function clf () 27 function clf ()
28 28
29 if (nargin == 0) 29 if (nargin == 0)
30 f = gcf (); 30 for k = get (gcf (), children)
31 obj = get (f); 31 delete (k);
32 for child = obj.children
33 delete (child);
34 endfor 32 endfor
35 set (f, "currentaxes", []);
36 drawnow (); 33 drawnow ();
37 else 34 else
38 print_usage (); 35 print_usage ();
39 endif 36 endif
40 37