Mercurial > hg > octave-lyh
comparison scripts/plot/__go_draw_figure__.m @ 7269:3fade00a6ac7
[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 |