Mercurial > hg > octave-nkf
diff scripts/plot/line.m @ 13115:cd808de114c1
Allow surface and patch to be called w/o arguments. Adding and fixing tests.
plot/line.m: Style fixes and test added.
plot/patch.m: Tests added.
plot/surface.m: Allow surface to be called w/o arguments. Tests added.
plot/private/__patch__.m: Allow patch to be called w/o arguments.
| author | Kai Habel <kai.habel@gmx.de> |
|---|---|
| date | Thu, 08 Sep 2011 15:43:40 +0200 |
| parents | ebb42fb2da04 |
| children | 2ea1658ad049 |
line wrap: on
line diff
--- a/scripts/plot/line.m +++ b/scripts/plot/line.m @@ -47,12 +47,13 @@ %! hf = figure (1232, "visible", "off"); %! unwind_protect %! h = line; +%! assert (findobj (hf, "type", "line"), h); %! assert (get (h, "xdata"), [0 1], eps); %! assert (get (h, "ydata"), [0 1], eps); %! assert (get (h, "type"), "line"); -%! assert (get (h, "color"), get(0,'defaultlinecolor')); -%! assert (get (h, "linestyle"), get(0,'defaultlinelinestyle')); -%! assert (get (h, "linewidth"), get(0,'defaultlinelinewidth'), eps); +%! assert (get (h, "color"), get (0, "defaultlinecolor")); +%! assert (get (h, "linestyle"), get (0, "defaultlinelinestyle")); +%! assert (get (h, "linewidth"), get (0, "defaultlinelinewidth"), eps); %! unwind_protect_cleanup %! close (hf); %! end_unwind_protect