[Octave-cvsupdate] SF.net SVN: octave:[7396] trunk/octave-forge/main/vrml/inst

[<et...@us...>]

Revision: 7396
          http://octave.svn.sourceforge.net/octave/?rev=7396&view=rev
Author:   etienne
Date:     2010-06-03 17:19:11 +0000 (Thu, 03 Jun 2010)

Log Message:
-----------
s/list/cell/g

Modified Paths:
--------------
    trunk/octave-forge/main/vrml/inst/vrml_group.m
    trunk/octave-forge/main/vrml/inst/vrml_parallelogram.m

Modified: trunk/octave-forge/main/vrml/inst/vrml_group.m
===================================================================
--- trunk/octave-forge/main/vrml/inst/vrml_group.m	2010-06-03 16:15:17 UTC (rev 7395)
+++ trunk/octave-forge/main/vrml/inst/vrml_group.m	2010-06-03 17:19:11 UTC (rev 7396)
@@ -25,13 +25,13 @@
 s = "";
 
 				# beginpre 2.1.38
-# if (nargin > 0) 
-#   varargin = list(varargin, all_va_args); 
-# end
+## if (nargin > 0) 
+##   varargin = list(varargin, all_va_args); 
+## end
 				# endpre 2.1.38
-if nargin > 0, s = nth (varargin, 1); end
+if nargin > 0, s = varargin{1}; end
 if nargin > 1
-  for i = 2:nargin, s = [s,",\n", nth(varargin, i)]; end
+  for i = 2:nargin, s = [s,",\n", varargin{i}]; end
 end
 ## indent s
 ni = 4;

Modified: trunk/octave-forge/main/vrml/inst/vrml_parallelogram.m
===================================================================
--- trunk/octave-forge/main/vrml/inst/vrml_parallelogram.m	2010-06-03 16:15:17 UTC (rev 7395)
+++ trunk/octave-forge/main/vrml/inst/vrml_parallelogram.m	2010-06-03 17:19:11 UTC (rev 7396)
@@ -63,8 +63,9 @@
 x = [x(:,1:3), x(:,1)-x(:,2)+x(:,3)];
 
 				# The facet
-s = vrml_faces (x,list (1:4),"col",col, "tran", tran,"emit",emit);
 
+s = vrml_faces (x, (1:4)', "col",col, "tran", tran,"emit",emit);
+
 				# Decoration : balls on vertices
 if balls
   if isnan (bemit), bemit = emit; end


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.