Mercurial > hg > octave-nkf

comparison scripts/plot/clf.m @ 13111:ebb42fb2da04

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Various fixes for tests in scripts/plot plot/cla.m: Use figure number 1232. plot/clf.m: Split test into two. plot/findall.m: Check only for graphic objects in figure 1232. plot/findall.m: Ditto. plot/gcf.m: Simplify test. plot/line.m: Check against default values now. plot/whitebg.m: Restore default values after tests.
author Kai Habel <kai.habel@gmx.de>
date Wed, 07 Sep 2011 20:13:18 +0200
parents 5553412c6614
children 2ea1658ad049
comparison
equal deleted inserted replaced
13110:2d5035847529 13111:ebb42fb2da04
79 %!test 79 %!test
80 %! hf = figure (1232, "visible", "off"); 80 %! hf = figure (1232, "visible", "off");
81 %! unwind_protect 81 %! unwind_protect
82 %! l = line; 82 %! l = line;
83 %! assert (!isempty (get (gcf, "children"))); 83 %! assert (!isempty (get (gcf, "children")));
84 %! unwind_protect_cleanup
85 %! close (hf);
86 %! end_unwind_protect
87
88 %!test
89 %! hf = figure (1232, "visible", "off");
90 %! unwind_protect
84 %! clf; 91 %! clf;
85 %! assert (isempty (get (gcf, "children"))); 92 %! assert (isempty (get (gcf, "children")));
86 %! unwind_protect_cleanup 93 %! unwind_protect_cleanup
87 %! close (hf); 94 %! close (hf);
88 %! end_unwind_protect 95 %! end_unwind_protect