changeset 6511:73ce4e14d35d

[project @ 2007-04-10 01:50:48 by jwe]
author jwe
date Tue, 10 Apr 2007 01:50:48 +0000
parents cbae86745c5b
children 747ba2dc157e
files scripts/ChangeLog scripts/plot/stem.m
diffstat 2 files changed, 14 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Mon Apr 09 23:15:47 2007 +0000
+++ b/scripts/ChangeLog	Tue Apr 10 01:50:48 2007 +0000
@@ -1,3 +1,8 @@
+2007-04-09  Daniel J. Sebald  <daniel.sebald@ieee.org>
+
+	* plot/stem.m: Add back the baseline line and let it be not adjustable
+	in response to a change in x limits for now.
+
 2007-04-09  John W. Eaton  <jwe@octave.org>
 
 	* plot/__go_draw_axes__.m (__gnuplot_write_data__): New function.
--- a/scripts/plot/stem.m	Mon Apr 09 23:15:47 2007 +0000
+++ b/scripts/plot/stem.m	Tue Apr 10 01:50:48 2007 +0000
@@ -113,12 +113,17 @@
   z = zeros (1, numel (x));
   xt = x(:)';
   yt = y(:)';
-  tmp = plot ([xt; xt], [z; yt], "color", lc, "linestyle", ls,
-	      x, y, "color", mc, "marker", ms, "linestyle", "",
-	      "markerfacecolor", fc);
+  h_stems = plot ([xt; xt], [z; yt], "color", lc, "linestyle", ls,
+		  x, y, "color", mc, "marker", ms, "linestyle", "",
+		  "markerfacecolor", fc);
+
+  ## Must draw the plot first to get proper x limits.
+  drawnow();
+  x_axis_range = get (gca, "xlim");
+  h_baseline = line (x_axis_range, [0, 0], "color", [0, 0, 0]);
 
   if (nargout > 0)
-    h = tmp;
+    h = [h_stems; h_baseline];
   endif
 
 endfunction