Mercurial > hg > octave-lyh

diff scripts/plot/__scatter__.m @ 8190:73d6b71788c0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
use case-insensitive comparison for graphics properties; misc style fixes
author John W. Eaton <jwe@octave.org>
date Mon, 06 Oct 2008 21:06:05 -0400
parents a2d9f325b65a
children 79c874fe5100
line wrap: on
line diff
--- a/scripts/plot/__scatter__.m
+++ b/scripts/plot/__scatter__.m
@@ -77,7 +77,7 @@
   iarg = firstnonnumeric;
   while (iarg <= nargin)
     arg = varargin{iarg++};
-    if (ischar (arg) && strncmp (tolower (arg), "filled", 6))
+    if (ischar (arg) && strncmpi (arg, "filled", 6))
       filled = true;
     elseif ((ischar (arg) || iscell (arg)) && ! have_marker)
       [linespec, valid] = __pltopt__ ("scatter", arg, false);
@@ -99,16 +99,16 @@
   endwhile
 
   if (ischar (c))
-    h = patch("faces", [1:length(x)].', "vertices", [x, y, z], "facecolor",
-	      "none", "edgecolor", c, "marker", marker, 
-	      "markersize", s, "linestyle", "none");
+    h = patch ("faces", [1:length(x)].', "vertices", [x, y, z], "facecolor",
+	       "none", "edgecolor", c, "marker", marker, 
+	       "markersize", s, "linestyle", "none");
     if (filled)
       set(h, "markerfacecolor", c); 
     endif
   else
-    h = patch("faces", [1:length(x)].', "vertices", [x, y, z], "facecolor",
-	      "none", "edgecolor", "flat", "cdata", c, "marker", marker, 
-	      "markersize", s, "linestyle", "none");
+    h = patch ("faces", [1:length(x)].', "vertices", [x, y, z], "facecolor",
+	       "none", "edgecolor", "flat", "cdata", c, "marker", marker, 
+	       "markersize", s, "linestyle", "none");
     if (filled)
       set(h, "markerfacecolor", "flat"); 
     endif