Mercurial > hg > octave-lyh

diff scripts/plot/oneplot.m @ 3103:98d862e12945

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-11-18 10:46:30 by jwe]
author jwe
date Tue, 18 Nov 1997 10:46:57 +0000
parents 8b262e771614
children 21208b797332
line wrap: on
line diff
--- a/scripts/plot/oneplot.m
+++ b/scripts/plot/oneplot.m
@@ -22,7 +22,7 @@
 ## NOTE: this will work only with gnuplot installed with
 ##       multiplot patch
 ##
-## Switches from multiplot (if in  multiplot mode) to single plot
+## Switches from multiplot (if in multiplot mode) to single plot
 ## mode
 
 ## Author: Vinayak Dutt <Dutt.Vinayak@mayo.EDU>
@@ -31,15 +31,21 @@
 
 function oneplot ()
 
-  if (! gnuplot_has_multiplot)
-    error ("oneplot: gnuplot does not appear to support this feature");
+  if (gnuplot_has_multiplot)
+
+    global __multiplot_mode__
+
+    if (! exist ("__multiplot_mode__"))
+      __multiplot_mode__ = 0;
+    endif
+
+    if (__multiplot_mode__)
+      gset nomultiplot;
+      gset size 1, 1;
+      gset origin 0, 0;
+      __multiplot_mode__ = 0;
+    endif
+
   endif
 
-  global multiplot_mode
-
-  gset nomultiplot;
-  gset size 1, 1;
-  gset origin 0, 0;
-  multiplot_mode = 0;
-
 endfunction