Mercurial > octave-nkf

diff scripts/plot/contour.m @ 6434:7caa5942d4da

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-03-23 13:59:29 by jwe]
author jwe
date Fri, 23 Mar 2007 13:59:29 +0000
parents 195382e92d51
children 98ee80702bca
line wrap: on
line diff
--- a/scripts/plot/contour.m	Fri Mar 23 12:54:03 2007 +0000
+++ b/scripts/plot/contour.m	Fri Mar 23 13:59:29 2007 +0000
@@ -44,7 +44,6 @@
 ## @seealso{contourc,line,plot}
 ## @end deftypefn
 
-
 ## Author: shaia
 
 function retval = contour (varargin)
@@ -57,9 +56,10 @@
 
   newplot ();
 
-  ## decode contourc output format
+  ## Decode contourc output format.
   i1 = 1;
   while (i1 < length (c))
+
     clev = c(1,i1);
     clen = c(2,i1);
 
@@ -73,9 +73,6 @@
     i1 += c(2,i1)+1;
   endwhile
   
-  drawnow ();
-
-  ## folowing DM's suggestion to surpress output if none asked for
   if (nargout > 0)
     retval = c;
   endif