Mercurial > octave-nkf

changeset 7043:83400ec4eb1e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-10-19 21:00:42 by jwe]
author jwe
date Fri, 19 Oct 2007 21:00:42 +0000
parents e54cc03d53f6
children 0064f7d6a451
files src/pt-idx.cc
diffstat 1 files changed, 1 insertions(+), 12 deletions(-) [+]
line wrap: on
line diff
--- a/src/pt-idx.cc	Fri Oct 19 20:43:33 2007 +0000
+++ b/src/pt-idx.cc	Fri Oct 19 21:00:42 2007 +0000
@@ -488,18 +488,7 @@
 			// comma-separated list?
 
 			if (first_retval_object.is_map ())
-			  {
-			    octave_value_list tmp_list
-			      = first_retval_object.subsref (type, idx, 1);
-
-			    if (! error_state)
-			      {
-				octave_value val = tmp_list(0);
-
-				retval.numel (val.is_cs_list ()
-					      ? val.numel () : 1);
-			      }
-			  }
+			  retval.numel (first_retval_object.numel ());
 		      }
 		  }
 		else