Mercurial > hg > octave-lyh

diff scripts/plot/__bar__.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 (2008-10-07)
parents 9a6f4713f765
children e07e93c04080
line wrap: on
line diff
--- a/scripts/plot/__bar__.m
+++ b/scripts/plot/__bar__.m
@@ -67,10 +67,10 @@
   newargs = {};
   have_line_spec = false;
   while (idx <= nargin - 2)
-    if (ischar (varargin{idx}) && strcmp (varargin{idx}, "grouped"))
+    if (ischar (varargin{idx}) && strcmpi (varargin{idx}, "grouped"))
       group = true;
       idx++;
-    elseif (ischar (varargin{idx}) && strcmp (varargin{idx}, "stacked"))
+    elseif (ischar (varargin{idx}) && strcmpi (varargin{idx}, "stacked"))
       group = false;
       idx++;
     else
@@ -88,8 +88,9 @@
 	width = varargin{idx++};
       elseif (idx == nargin - 2)
 	newargs = [newargs,varargin(idx++)];
-      elseif (ischar (varargin{idx}) && strcmp (tolower (varargin{idx}), "basevalue") &&
-          isscalar (varargin{idx+1}))
+      elseif (ischar (varargin{idx})
+	      && strcmpi (varargin{idx}, "basevalue")
+	      && isscalar (varargin{idx+1}))
         bv = varargin{idx+1};
         idx += 2;
       else