Mercurial > hg > octave-max
diff scripts/plot/findobj.m @ 13111:ebb42fb2da04
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 |
line wrap: on
line diff
--- a/scripts/plot/findobj.m +++ b/scripts/plot/findobj.m @@ -248,12 +248,11 @@ %! hf = figure (fign, "visible", "off"); %! unwind_protect %! l = line; -%! obj = findobj ("type", "line"); +%! obj = findobj (hf, "type", "line"); %! assert (l, obj); -%! assert (gca, findobj ("type", "axes")); -%! assert (fign, findobj ("type", "figure")); -%! assert (0, findobj ("type", "root")); -%! assert (isempty (findobj ("type", "xyzxyz"))); +%! assert (gca, findobj (hf, "type", "axes")); +%! assert (fign, findobj (hf, "type", "figure")); +%! assert (isempty (findobj (hf, "type", "xyzxyz"))); %! unwind_protect_cleanup %! close (hf); %! end_unwind_protect