Mercurial > hg > octave-nkf

comparison scripts/plot/fill.m @ 11325:56c8a00a269f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fill.m: Allow multiple filled polygons.
author Ben Abbott <bpabbott@mac.com>
date Wed, 08 Dec 2010 19:55:31 -0500
parents 262c365eb71c
children fd0a3ac60b0e
comparison
equal deleted inserted replaced
11324:e773d57de572 11325:56c8a00a269f
35 oldh = gca (); 35 oldh = gca ();
36 unwind_protect 36 unwind_protect
37 axes (h); 37 axes (h);
38 38
39 nextplot = get (h, "nextplot"); 39 nextplot = get (h, "nextplot");
40 if (strncmp (nextplot, "replace", 7))
41 set (h, "nextplot", "add");
42 endif
43 for i = 1 : length (iargs) 40 for i = 1 : length (iargs)
41 if (i > 1 && strncmp (nextplot, "replace", 7))
42 set (h, "nextplot", "add");
43 endif
44 if (i == length (iargs)) 44 if (i == length (iargs))
45 args = varargin (iargs(i):end); 45 args = varargin (iargs(i):end);
46 else 46 else
47 args = varargin (iargs(i):iargs(i+1)-1); 47 args = varargin (iargs(i):iargs(i+1)-1);
48 endif 48 endif