Mercurial > octave-nkf
comparison scripts/plot/__go_draw_axes__.m @ 8915:485eabc0cfec
__go_draw_axes__.m: Preserve the order of axes' children when pruning the handles for the {x,y,z}labels and title.
author | Ben Abbott <bpabbott@mac.com> |
---|---|
date | Fri, 06 Mar 2009 01:07:04 -0500 |
parents | 52596fe9f178 |
children | eb63fbe60fab |
comparison
equal
deleted
inserted
replaced
8914:354179c24c79 | 8915:485eabc0cfec |
---|---|
292 truecolor = false; | 292 truecolor = false; |
293 | 293 |
294 fputs (plot_stream, "set clip two;\n"); | 294 fputs (plot_stream, "set clip two;\n"); |
295 | 295 |
296 kids = axis_obj.children; | 296 kids = axis_obj.children; |
297 kids = setdiff (kids, [axis_obj.xlabel; axis_obj.ylabel; ... | 297 ## Remove the axis labels and title from the children, and |
298 axis_obj.zlabel; axis_obj.title]); | 298 ## preserved the original order. |
299 [jnk, k] = setdiff (kids, [axis_obj.xlabel; axis_obj.ylabel; ... | |
300 axis_obj.zlabel; axis_obj.title]); | |
301 kids = kids (sort (k)); | |
299 | 302 |
300 if (nd == 3) | 303 if (nd == 3) |
301 fputs (plot_stream, "set parametric;\n"); | 304 fputs (plot_stream, "set parametric;\n"); |
302 fputs (plot_stream, "set style data lines;\n"); | 305 fputs (plot_stream, "set style data lines;\n"); |
303 fputs (plot_stream, "set surface;\n"); | 306 fputs (plot_stream, "set surface;\n"); |