Mercurial > hg > octave-nkf
diff scripts/plot/__pltopt1__.m @ 4007:31448e09d38e
[project @ 2002-07-26 01:47:32 by jwe]
author | jwe |
---|---|
date | Fri, 26 Jul 2002 01:47:32 +0000 |
parents | efac4b97bb09 |
children | 17826ec287bc |
line wrap: on
line diff
--- a/scripts/plot/__pltopt1__.m +++ b/scripts/plot/__pltopt1__.m @@ -72,9 +72,9 @@ ## First get next char. if (max (size (opt)) > 1) -# [char, opt] = sscanf (opt, "%c %s", "C"); - char = opt(1); - opt = opt(2:length(opt)); + ## [char, opt] = sscanf (opt, "%c %s", "C"); + char = opt(1); + opt = opt(2:length(opt)); else char = opt; more_opts = 0; @@ -106,7 +106,7 @@ elseif (strcmp (char, "~")) set_yerrbars = 1; elseif (strcmp (char, ">")) - set_xerrbars = 1; + set_xerrbars = 1; elseif (strcmp (char, "#")) set_boxes = 1; elseif (strcmp (char, "0") || strcmp (char, "1") ... @@ -227,11 +227,11 @@ endif if (strcmp (fmt, WITH)) - if(strcmp (caller, "__errplot")) - fmt = strcat (fmt, " ", YERRORBARS); - else - fmt = strcat (fmt, " ", LINES); - endif + if (strcmp (caller, "__errplot__")) + fmt = strcat (fmt, " ", YERRORBARS); + else + fmt = strcat (fmt, " ", LINES); + endif endif if (set_color)