# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1204793915 18000
# Node ID 90536e155fdef985477ecc4047627783074b4820
# Parent  438eb170e6045ea41e830e2922833a5170fc658c
adjust markersize by a factor of 1/6

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,5 +1,7 @@
 2008-03-06  John W. Eaton  <jwe@octave.org>
 
+	* plot/__go_draw_axes__.m: Adjust markersize by a factor of 1/6.
+
 	* general/interpn.m: New test.
 
 2008-03-05  Ben Abbott  <bpabbott@mac.com>
diff --git a/scripts/plot/__go_draw_axes__.m b/scripts/plot/__go_draw_axes__.m
--- a/scripts/plot/__go_draw_axes__.m
+++ b/scripts/plot/__go_draw_axes__.m
@@ -622,7 +622,7 @@
 	     usingclause{data_idx} = "";
 
 	     if (isfield (obj, "markersize"))
-	       mdat = obj.markersize;
+	       mdat = obj.markersize / 6;
 	     endif
 
              if (isfield (obj, "edgecolor"))
@@ -747,9 +747,9 @@
 
 	     if (isfield (obj, "markersize"))
 	       if (length (mdat) == nc)
-		 m = mdat(i);
+		 m = mdat(i) / 6;
 	       else
-		 m = mdat;
+		 m = mdat / 6;
 	       endif
 	       if (! strcmpi (style, "lines"))
 		 if (have_newer_gnuplot)
@@ -1369,10 +1369,10 @@
 
     if (isfield (obj, "markersize"))
       if (have_newer_gnuplot)
-	fprintf (plot_stream, " pointsize %f", obj.markersize);
+	fprintf (plot_stream, " pointsize %f", obj.markersize / 6);
       else
 	if (! strcmpi (style, "lines"))
-	  with = sprintf ("%s ps %f", with, obj.markersize);
+	  with = sprintf ("%s ps %f", with, obj.markersize / 6);
 	endif
       endif
       found_style = true;