Mercurial > octave-nkf
diff scripts/plot/__go_draw_axes__.m @ 6413:cf8e671beada
[project @ 2007-03-15 14:11:51 by jwe]
author | jwe |
---|---|
date | Thu, 15 Mar 2007 14:11:51 +0000 |
parents | b298a4c12fc3 |
children | 6b1535a09268 |
line wrap: on
line diff
--- a/scripts/plot/__go_draw_axes__.m Thu Mar 15 02:36:10 2007 +0000 +++ b/scripts/plot/__go_draw_axes__.m Thu Mar 15 14:11:51 2007 +0000 @@ -32,7 +32,8 @@ parent_figure_obj = get (axis_obj.parent); - have_newer_gnuplot = compare_versions (__gnuplot_version__ (), "4.0", ">"); + persistent have_newer_gnuplot ... + = compare_versions (__gnuplot_version__ (), "4.0", ">"); ## Set axis properties here? @@ -765,7 +766,8 @@ function style = do_linestyle_command (obj, idx, plot_stream) - have_newer_gnuplot = compare_versions (__gnuplot_version__ (), "4.0", ">"); + persistent have_newer_gnuplot ... + = compare_versions (__gnuplot_version__ (), "4.0", ">"); if (have_newer_gnuplot) fprintf (plot_stream, "set style line %d default;\n", idx); @@ -812,11 +814,11 @@ case "+" pt = "1"; case "o" - pt = "7"; + pt = "6"; case "*" pt = "3"; case "." - pt = "0"; + pt = "7"; case "x" pt = "2"; case {"square", "s"} @@ -834,7 +836,7 @@ case {"pentagram", "p"} pt = "4"; case {"hexagram", "h"} - pt = "6"; + pt = "12"; case "none" pt = ""; otherwise