Mercurial > hg > octave-lojdl
changeset 15201:efac5593b1de
* __pie__.m: Avoid syntax errors in matrix lists.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sat, 18 Aug 2012 22:03:11 -0400 |
parents | fa0cf7d870d7 |
children | f3b5cadfd6d5 |
files | scripts/plot/private/__pie__.m |
diffstat | 1 files changed, 8 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/plot/private/__pie__.m +++ b/scripts/plot/private/__pie__.m @@ -117,16 +117,16 @@ if (strncmp (caller, "pie3", 4)) ln = length (xn); zlvl = 0.35; - sx = repmat (xoff + [0, - sind(xn), 0], [2 1]); - sy = repmat (yoff + [0, cosd(xn), 0], [2 1]); + sx = repmat (xoff + [0, -sind(xn), 0], [2, 1]); + sy = repmat (yoff + [0, cosd(xn), 0], [2, 1]); sz = [zeros(1, ln + 2); zlvl * ones(1, ln + 2)]; sc = i * ones (size (sz)); hlist = [hlist; - patch (xoff + [0, - sind(xn)], yoff + [0, cosd(xn)], zeros (1, ln + 1), i); - surface (sx, sy, sz, sc); - patch (xoff + [0, - sind(xn)], yoff + [0, cosd(xn)], zlvl * ones (1, ln + 1), i); - text (xt, yt, zlvl, labels{i})]; + patch(xoff + [0, -sind(xn)], yoff + [0, cosd(xn)], zeros (1, ln + 1), i); + surface(sx, sy, sz, sc); + patch(xoff + [0, -sind(xn)], yoff + [0, cosd(xn)], zlvl * ones (1, ln + 1), i); + text(xt, yt, zlvl, labels{i})]; elseif (strncmp (caller, "pie", 3)) if (xt > 0) @@ -135,8 +135,8 @@ align = "right"; endif - hlist = [hlist; patch(xoff + [0, - sind(xn)], yoff + [0, cosd(xn)], i); - text (xt, yt, labels{i}, "horizontalalignment", align)]; + hlist = [hlist; patch(xoff + [0, -sind(xn)], yoff + [0, cosd(xn)], i); + text(xt, yt, labels{i}, "horizontalalignment", align)]; else error ("__pie__: unknown caller `%s'", caller);