diff scripts/plot/figure.m @ 5406:c49aec8a9080

[project @ 2005-07-08 15:25:43 by jwe]
author jwe
date Fri, 08 Jul 2005 15:25:44 +0000
parents 4c8a2e4e0717
children 250917610b55
line wrap: on
line diff
--- a/scripts/plot/figure.m
+++ b/scripts/plot/figure.m
@@ -29,6 +29,8 @@
 
 function f = figure (n)
 
+  __plot_globals__;
+
   static figure_list = create_set (0);
   static figure_called = 0;
 
@@ -38,6 +40,8 @@
     f = n;
   endif
 
+  __current_figure__ = f;
+
   if (nargin < 2)
     if (gnuplot_has_frames)
       gnuterm = getenv ("GNUTERM");