Mercurial > hg > octave-nkf
diff scripts/plot/__plt1__.m @ 6264:cc2bee854d23
[project @ 2007-02-01 10:00:05 by jwe]
author | jwe |
---|---|
date | Thu, 01 Feb 2007 10:00:05 +0000 |
parents | 44c91c5dfe1d |
children | a5cd8b77e892 |
line wrap: on
line diff
--- a/scripts/plot/__plt1__.m +++ b/scripts/plot/__plt1__.m @@ -23,26 +23,18 @@ ## Author: jwe -function __plt1__ (h, x1, fmt, key) +function __plt1__ (h, x1, options) - if (nargin < 2 || nargin > 4) + if (nargin < 2 || nargin > 3) print_usage (); endif - if (nargin < 3 || isempty (fmt)) - fmt = {""}; + if (nargin < 3 || isempty (options)) + options = __default_plot_options__ (); endif - if (nargin < 4 || isempty (key)) - key = {""}; - endif - - if (! iscellstr (fmt)) - error ("__plt1__: fmt must be a cell array of character strings"); - endif - - if (! iscell (key)) - error ("__plt1__: fmt must be a cell array"); + if (! isstruct (options)) + error ("__plt1__: options must be a struct array"); endif [nr, nc] = size (x1); @@ -61,6 +53,6 @@ x1 = (1:nr)'; endif - __plt2__ (h, x1, x2, fmt, key); + __plt2__ (h, x1, x2, options); endfunction