Mercurial > hg > octave-lyh
diff scripts/plot/gnuplot_drawnow.m @ 8249:1f429086565c
[mq]: hidden-children
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Tue, 21 Oct 2008 14:06:25 -0400 |
parents | a0ec02774303 |
children | d750feaefa8e |
line wrap: on
line diff
--- a/scripts/plot/gnuplot_drawnow.m +++ b/scripts/plot/gnuplot_drawnow.m @@ -34,16 +34,15 @@ endif if (nargin >= 3 && nargin <= 5) - f = __get__ (h); plot_stream = []; fid = []; unwind_protect [plot_stream, enhanced] = open_gnuplot_stream (1, [], term, file); - __go_draw_figure__ (f, plot_stream, enhanced, mono); + __go_draw_figure__ (h, plot_stream, enhanced, mono); if (nargin == 5) fid = fopen (debug_file, "wb"); enhanced = init_plot_stream (fid, [], term, file); - __go_draw_figure__ (f, fid, enhanced, mono); + __go_draw_figure__ (h, fid, enhanced, mono); endif unwind_protect_cleanup if (! isempty (plot_stream)) @@ -54,15 +53,14 @@ endif end_unwind_protect elseif (nargin == 1) - f = __get__ (h); - plot_stream = f.__plot_stream__; + plot_stream = get (h, "__plot_stream__"); if (isempty (plot_stream)) [plot_stream, enhanced] = open_gnuplot_stream (2, h); set (h, "__enhanced__", enhanced); else - enhanced = f.__enhanced__; + enhanced = get (h, "__enhanced__"); endif - __go_draw_figure__ (f, plot_stream (1), enhanced, mono); + __go_draw_figure__ (h, plot_stream (1), enhanced, mono); fflush (plot_stream (1)); else print_usage ();