Mercurial > octave-nkf

changeset 6751:c0370a971fef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-06-25 15:12:07 by jwe]
author jwe
date Mon, 25 Jun 2007 15:12:07 +0000
parents 2de995da10b8
children ee2ad7b5454a
files scripts/ChangeLog scripts/plot/__go_draw_axes__.m
diffstat 2 files changed, 12 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Sun Jun 24 21:37:08 2007 +0000
+++ b/scripts/ChangeLog	Mon Jun 25 15:12:07 2007 +0000
@@ -1,3 +1,9 @@
+2007-06-25  John W. Eaton  <jwe@octave.org>
+
+	* plot/__go_draw_axes__.m: Handle char arrays for tic labels.
+	Recycle tic labels if necessary.  From Juhani Saastamoinen
+	<juhani@cs.joensuu.fi>.
+
 2007-06-20  John W. Eaton  <jwe@octave.org>
 
 	* strings/index.m: Allow strings to be empty.
--- a/scripts/plot/__go_draw_axes__.m	Sun Jun 24 21:37:08 2007 +0000
+++ b/scripts/plot/__go_draw_axes__.m	Mon Jun 25 15:12:07 2007 +0000
@@ -910,10 +910,13 @@
     if (isempty (tics))
       fprintf (plot_stream, "unset %stics;\n", ax);
     elseif (strcmp (labelmode, "manual") && ! isempty (labels))
-      k = 1;
-      ntics = numel (tics);
-      nlabels = numel (labels);
+      if (ischar (labels))
+	labels = cellstr (labels);
+      endif
       if (iscellstr (labels))
+	k = 1;
+	ntics = numel (tics);
+	nlabels = numel (labels);
 	fprintf (plot_stream, "set format %s \"%%s\";\n", ax);
 	fprintf (plot_stream, "set %stics (", ax);
 	for i = 1:ntics