[Octave-cvsupdate] octave-forge/extra/jhandles/inst surf.m, 1.2, 1.3

[Michael G. <gof...@us...>]

Update of /cvsroot/octave/octave-forge/extra/jhandles/inst
In directory sc8-pr-cvs3.sourceforge.net:/tmp/cvs-serv14260/inst

Modified Files:
	surf.m 
Log Message:
make surf work with a single argument

Index: surf.m
===================================================================
RCS file: /cvsroot/octave/octave-forge/extra/jhandles/inst/surf.m,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- surf.m	21 Jun 2007 22:29:04 -0000	1.2
+++ surf.m	9 Aug 2007 12:29:35 -0000	1.3
@@ -25,6 +25,7 @@
       [nr, nc] = size (z);
       x = 1:nc;
       y = (1:nr)';
+      [x, y] = meshgrid (x, y);
     else
       error ("surf: argument must be a matrix");
     endif
@@ -33,7 +34,7 @@
       if (rows (z) == length (y) && columns (z) == length (x))
         x = x(:)';
         y = y(:);
-		[x, y] = meshgrid (x, y);
+        [x, y] = meshgrid (x, y);
       else
         msg = "surf: rows (z) must be the same as length (y) and";
         msg = sprintf ("%s\ncolumns (z) must be the same as length (x)", msg);