Mercurial > octave-nkf

comparison scripts/plot/__go_draw_figure__.m @ 7269:3fade00a6ac7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-07 19:26:20 by jwe]
author jwe
date Fri, 07 Dec 2007 19:26:21 +0000
parents ffdbdf53665c
children c18512d0ddb6
comparison
equal deleted inserted replaced
7268:47e4ebac1bfa 7269:3fade00a6ac7
18 18
19 ## Undocumented internal function. 19 ## Undocumented internal function.
20 20
21 ## Author: jwe 21 ## Author: jwe
22 22
23 function __go_draw_figure__ (f, plot_stream, enhanced) 23 function __go_draw_figure__ (f, plot_stream, enhanced, mono)
24 24
25 if (nargin == 3) 25 if (nargin == 4)
26 if (strcmp (f.type, "figure")) 26 if (strcmp (f.type, "figure"))
27 27
28 ## Set figure properties here? 28 ## Set figure properties here?
29 29
30 kids = f.children; 30 kids = f.children;
54 54
55 for i = 1:nkids 55 for i = 1:nkids
56 obj = get (kids(i)); 56 obj = get (kids(i));
57 switch (obj.type) 57 switch (obj.type)
58 case "axes" 58 case "axes"
59 __go_draw_axes__ (kids (i), plot_stream, enhanced); 59 __go_draw_axes__ (kids (i), plot_stream, enhanced, mono);
60 otherwise 60 otherwise
61 error ("__go_draw_figure__: unknown object class, %s", 61 error ("__go_draw_figure__: unknown object class, %s",
62 obj.type); 62 obj.type);
63 endswitch 63 endswitch
64 endfor 64 endfor