# HG changeset patch
# User jwe
# Date 1173981798 0
# Node ID 6b1535a09268a83fc12b23e92e527a477d553661
# Parent  250eebbd7cccdf43b0ae0337d6b498cfc0c6303f
[project @ 2007-03-15 18:03:17 by jwe]

diff -r 250eebbd7ccc -r 6b1535a09268 scripts/ChangeLog
--- a/scripts/ChangeLog	Thu Mar 15 16:04:52 2007 +0000
+++ b/scripts/ChangeLog	Thu Mar 15 18:03:18 2007 +0000
@@ -6,9 +6,11 @@
 2007-03-15  Daniel J Sebald  <daniel.sebald@ieee.org>
 
 	* plot/__go_draw_axes__.m (do_linestyle_command): Fix marker types.
+	Use numeric line types.
 
 	* control/base/rlocus.m: Add asymptotes to the plot.  Use wider
-	lines and larger markers.
+	lines and larger markers.  Remove key titles from line type
+	properties.
 
 2007-03-14  John W. Eaton  <jwe@octave.org>
 
diff -r 250eebbd7ccc -r 6b1535a09268 scripts/control/base/rlocus.m
--- a/scripts/control/base/rlocus.m	Thu Mar 15 16:04:52 2007 +0000
+++ b/scripts/control/base/rlocus.m	Thu Mar 15 18:03:18 2007 +0000
@@ -243,9 +243,9 @@
         args{1,++kk} = [sigma_A sigma_A+len_A*cos(phi_A)];
         args{2,kk} = [0 len_A*sin(phi_A)];
         if (i_A == 1)
-          args{3,kk} = "k-;asymptotes;";
+          args{3,kk} = "k--;asymptotes;";
         else
-          args{3,kk} = "k-";
+          args{3,kk} = "k--";
         endif
       endfor
     endif
diff -r 250eebbd7ccc -r 6b1535a09268 scripts/plot/__go_draw_axes__.m
--- a/scripts/plot/__go_draw_axes__.m	Thu Mar 15 16:04:52 2007 +0000
+++ b/scripts/plot/__go_draw_axes__.m	Thu Mar 15 18:03:18 2007 +0000
@@ -788,18 +788,22 @@
   if (isfield (obj, "linestyle"))
     switch (obj.linestyle)
       case "-"
-	lt = "lines";
+	lt = "1";
       case "--"
-	lt = "";
+	lt = "2";
       case ":"
-	lt = "";
+	lt = "3";
       case "-."
-	lt = "";
+	lt = "6";
       case "none"
 	lt = "";
       otherwise
 	lt = "";
     endswitch
+    if (! isempty (lt))
+      fprintf (plot_stream, " linetype %s", lt);
+      found_style = true;
+    endif
   else
     lt = "";
   endif