Mercurial > octave

diff scripts/plot/__stem__.m @ 8315:e9687c313d5f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix callbacks in stem and quiver for change in order of children. Fix for scaling in quiver for single arrow
author David Bateman <dbateman@free.fr>
date Wed, 12 Nov 2008 12:21:04 +0100
parents 6ef647359f07
children bc982528de11
line wrap: on
line diff
--- a/scripts/plot/__stem__.m	Wed Nov 12 10:24:14 2008 +0100
+++ b/scripts/plot/__stem__.m	Wed Nov 12 12:21:04 2008 +0100
@@ -497,15 +497,15 @@
   yt = get(h, "ydata")(:)';
   ny = length (yt);
   yt = [b0 * ones(1, ny); yt; NaN(1, ny)](:);
-  set (kids(end), "ydata", yt);
+  set (kids(2), "ydata", yt);
 endfunction
 
 function update_props (h, d)
   kids = get (h, "children");
-  set (kids(1), "color", get (h, "color"), 
+  set (kids(2), "color", get (h, "color"), 
        "linewidth", get (h, "linewidth"),
        "linestyle", get (h, "linestyle"));
-  set (kids(2), "color", get (h, "color"), 
+  set (kids(1), "color", get (h, "color"), 
        "marker", get (h, "marker"),
        "markerfacecolor", get (h, "markerfacecolor"),
        "markersize", get (h, "markersize"));
@@ -537,7 +537,7 @@
     endif
 
     kids = get (h, "children");
-    set (kids(1), "xdata", xt, "ydata", yt, "zdata", zt)
-    set (kids(2), "xdata", x, "ydata", y, "zdata", z)
+    set (kids(2), "xdata", xt, "ydata", yt, "zdata", zt)
+    set (kids(1), "xdata", x, "ydata", y, "zdata", z)
   endif
 endfunction