Mercurial > octave-antonio

changeset 17146:bbda4d952eb5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix pop-up of invisible figures during printing. * scripts/plot/print.m, scripts/plot/private/__fltk_print__.m, scripts/plot/private/__gnuplot_print__.m: Use 'set (0, "currentfigure", n) to switch figures so that invisible figures aren't exposed.
author Rik <rik@octave.org>
date Thu, 01 Aug 2013 21:25:26 -0700
parents f7fd413dcf4a
children 35a1bd41aa02
files scripts/plot/print.m scripts/plot/private/__fltk_print__.m scripts/plot/private/__gnuplot_print__.m
diffstat 3 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/plot/print.m	Thu Aug 01 17:47:36 2013 -0700
+++ b/scripts/plot/print.m	Thu Aug 01 21:25:26 2013 -0700
@@ -293,7 +293,7 @@
   endif
 
   orig_figure = get (0, "currentfigure");
-  figure (opts.figure);
+  set (0, "currentfigure", opts.figure);
 
   if (opts.append_to_file)
     [~, ~, ext] = fileparts (opts.ghostscript.output);
@@ -437,7 +437,7 @@
   end_unwind_protect
 
   if (isfigure (orig_figure))
-    figure (orig_figure);
+    set (0, "currentfigure", orig_figure);
   endif
 
 endfunction
--- a/scripts/plot/private/__fltk_print__.m	Thu Aug 01 17:47:36 2013 -0700
+++ b/scripts/plot/private/__fltk_print__.m	Thu Aug 01 21:25:26 2013 -0700
@@ -25,7 +25,7 @@
 
   dos_shell = (ispc () && ! isunix ());
 
-  figure (opts.figure);
+  set (0, "currentfigure", opts.figure);
   drawnow ("expose");
   __fltk_redraw__ ();
 
--- a/scripts/plot/private/__gnuplot_print__.m	Thu Aug 01 17:47:36 2013 -0700
+++ b/scripts/plot/private/__gnuplot_print__.m	Thu Aug 01 21:25:26 2013 -0700
@@ -184,7 +184,7 @@
   else
     mono = false;
   endif
-  figure (opts.figure);
+  set (0, "currentfigure", opts.figure);
   if (isempty (opts.debug_file) || ! opts.debug)
     drawnow (term, file, mono);
   else